home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_8 / issue_11 / fontpaint < prev    next >
ArcFS Archive  |  1995-08-02  |  13.4 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: ArcFS Archive (archive/arcFS).

You can browse this item here: fontpaint

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | d8 00 00 00 54 03 00 00 |Archive.|....T...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 72 66 5f 66 6f 6e | 74 73 00 00 ff ff ff ff |.!rf_fon|ts......|
|00000070| 46 dc fd ff 67 81 f1 2b | 00 00 00 00 ff ff ff ff |F...g..+|........|
|00000080| b4 00 00 80 82 21 52 75 | 6e 00 00 00 00 00 00 00 |.....!Ru|n.......|
|00000090| 34 00 00 00 43 eb ff ff | 2c bc ad d6 03 00 da c1 |4...C...|,.......|
|000000a0| 34 00 00 00 24 00 00 00 | 82 21 52 75 6e 49 6d 61 |4...$...|.!RunIma|
|000000b0| 67 65 00 00 9b 2e 00 00 | 46 fb ff ff b0 4c 9f 22 |ge......|F....L."|
|000000c0| 03 00 13 db 9b 2e 00 00 | 7c 00 00 00 82 21 53 70 |........||....!Sp|
|000000d0| 72 69 74 65 73 00 00 00 | e0 02 00 00 46 f9 ff ff |rites...|....F...|
|000000e0| be f7 44 24 03 00 6f 16 | e0 02 00 00 3b 2f 00 00 |..D$..o.|....;/..|
|000000f0| 00 53 43 53 00 00 00 00 | 00 00 00 00 00 00 00 00 |.SCS....|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 bb bb 00 b0 |........|........|
|00000110| c7 56 eb ad 00 00 00 00 | 00 00 00 00 00 00 00 00 |.V......|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 46 69 6c 65 | 44 61 74 61 82 21 52 75 |....File|Data.!Ru|
|00000360| 6e 00 00 00 00 00 00 00 | 34 00 00 00 43 eb ff ff |n.......|4...C...|
|00000370| 2c bc ad d6 03 00 da c1 | 57 69 6d 70 53 6c 6f 74 |,.......|WimpSlot|
|00000380| 20 2d 6d 69 6e 20 33 32 | 4b 20 2d 6d 61 78 20 33 | -min 32|K -max 3|
|00000390| 32 4b 0a 52 75 6e 20 3c | 4f 62 65 79 24 44 69 72 |2K.Run <|Obey$Dir|
|000003a0| 3e 2e 21 52 75 6e 49 6d | 61 67 65 0a 46 69 6c 65 |>.!RunIm|age.File|
|000003b0| 44 61 74 61 82 21 52 75 | 6e 49 6d 61 67 65 00 00 |Data.!Ru|nImage..|
|000003c0| 9b 2e 00 00 46 fb ff ff | b0 4c 9f 22 03 00 13 db |....F...|.L."....|
|000003d0| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|000003e0| 0d 00 14 2b f4 2a 2a 20 | 53 59 53 20 22 46 6f 6e |...+.** |SYS "Fon|
|000003f0| 74 5f 50 61 69 6e 74 22 | 20 54 65 73 74 20 75 6e |t_Paint"| Test un|
|00000400| 64 65 72 20 57 69 6d 70 | 20 2a 2a 0d 00 1e 1f f4 |der Wimp| **.....|
|00000410| 2a 2a 20 52 61 79 20 46 | 61 76 72 65 2c 20 4a 75 |** Ray F|avre, Ju|
|00000420| 6e 65 20 31 39 39 35 20 | 2a 2a 0d 00 28 04 0d 00 |ne 1995 |**..(...|
|00000430| 32 09 f2 69 6e 69 74 0d | 00 3c 04 0d 00 46 0e c8 |2..init.|.<...F..|
|00000440| 95 20 ac 20 71 75 69 74 | 25 0d 00 50 0d 20 20 20 |. . quit|%..P. |
|00000450| 20 f2 70 6f 6c 6c 0d 00 | 5a 05 ce 0d 00 64 17 c8 | .poll..|Z....d..|
|00000460| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 44 6f 77 |. "Wimp_|CloseDow|
|00000470| 6e 22 0d 00 6e 04 0d 00 | 78 4e c8 99 20 22 46 6f |n"..n...|xN.. "Fo|
|00000480| 6e 74 5f 4c 6f 73 65 46 | 6f 6e 74 22 2c 66 31 25 |nt_LoseF|ont",f1%|
|00000490| 3a f4 2a 2a 20 28 54 68 | 69 73 20 63 6c 6f 73 65 |:.** (Th|is close|
|000004a0| 73 20 27 6f 70 65 6e 27 | 20 66 6f 6e 74 20 66 69 |s 'open'| font fi|
|000004b0| 6c 65 20 66 72 6f 6d 20 | 27 50 52 4f 43 69 6e 69 |le from |'PROCini|
|000004c0| 74 27 2e 29 0d 00 82 04 | 0d 00 8c 05 e0 0d 00 96 |t'.)....|........|
|000004d0| 04 0d 00 a0 2d f4 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |....-.**|********|
|000004e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000004f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 00 |********|******..|
|00000500| aa 2d f4 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.-.*****|********|
|00000510| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000520| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0d 00 b4 2d f4 |********|***...-.|
|00000530| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000540| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000550| 2a 2a 2a 2a 2a 2a 2a 2a | 0d 00 be 04 0d 00 c8 0b |********|........|
|00000560| dd 20 f2 69 6e 69 74 0d | 00 d2 10 de 20 62 6c 6f |. .init.|.... blo|
|00000570| 63 6b 25 20 32 35 35 0d | 00 dc 22 71 75 69 74 25 |ck% 255.|.."quit%|
|00000580| 3d a3 3a 61 70 70 24 3d | 22 46 6f 6e 74 5f 50 61 |=.:app$=|"Font_Pa|
|00000590| 69 6e 74 20 54 65 73 74 | 22 0d 00 e6 04 0d 00 f0 |int Test|".......|
|000005a0| 51 de 20 77 69 6e 74 69 | 74 6c 65 25 20 33 31 3a |Q. winti|tle% 31:|
|000005b0| f4 2a 2a 20 46 6f 72 20 | 69 6e 64 69 72 65 63 74 |.** For |indirect|
|000005c0| 65 64 20 77 69 6e 64 6f | 77 20 74 69 74 6c 65 20 |ed windo|w title |
|000005d0| 28 20 3e 31 31 63 68 61 | 72 61 63 74 65 72 73 2b |( >11cha|racters+|
|000005e0| 74 65 72 6d 69 6e 61 74 | 6f 72 29 20 2a 2a 0d 00 |terminat|or) **..|
|000005f0| fa 2b 24 77 69 6e 74 69 | 74 6c 65 25 3d 22 27 46 |.+$winti|tle%="'F|
|00000600| 6f 6e 74 5f 50 61 69 6e | 74 27 20 44 65 6d 6f 6e |ont_Pain|t' Demon|
|00000610| 73 74 72 61 74 69 6f 6e | 22 0d 01 04 04 0d 01 0e |stration|".......|
|00000620| 23 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |#.------|--------|
|00000630| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000640| 0d 01 18 04 0d 01 22 15 | de 20 77 69 6d 70 69 6e |......".|. wimpin|
|00000650| 69 74 77 6f 72 64 25 20 | 34 0d 01 2c 71 21 77 69 |itword% |4..,q!wi|
|00000660| 6d 70 69 6e 69 74 77 6f | 72 64 25 3d 30 3a f4 2a |mpinitwo|rd%=0:.*|
|00000670| 2a 20 44 65 63 6c 61 72 | 69 6e 67 20 74 68 69 73 |* Declar|ing this|
|00000680| 20 61 73 20 30 20 6d 65 | 61 6e 73 20 74 68 61 74 | as 0 me|ans that|
|00000690| 20 61 6c 6c 20 4d 65 73 | 73 61 67 65 73 20 61 72 | all Mes|sages ar|
|000006a0| 65 20 70 61 73 73 65 64 | 20 74 6f 20 74 68 69 73 |e passed| to this|
|000006b0| 20 74 61 73 6b 2e 20 4e | 6f 74 20 75 73 65 64 20 | task. N|ot used |
|000006c0| 69 6e 20 4f 53 20 32 20 | 2a 2a 0d 01 36 04 0d 01 |in OS 2 |**..6...|
|000006d0| 40 39 c8 99 20 22 57 69 | 6d 70 5f 49 6e 69 74 69 |@9.. "Wi|mp_Initi|
|000006e0| 61 6c 69 73 65 22 2c 33 | 31 30 2c 26 34 42 35 33 |alise",3|10,&4B53|
|000006f0| 34 31 35 34 2c 61 70 70 | 24 2c 77 69 6d 70 69 6e |4154,app|$,wimpin|
|00000700| 69 74 77 6f 72 64 25 0d | 01 4a 04 0d 01 54 23 f4 |itword%.|.J...T#.|
|00000710| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000720| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 01 |--------|------..|
|00000730| 5e 04 0d 01 68 39 ee 20 | 85 20 f2 65 72 72 6f 72 |^...h9. |. .error|
|00000740| 28 f6 24 2b 22 20 61 74 | 20 4c 69 6e 65 20 22 2b |(.$+" at| Line "+|
|00000750| c3 28 9e 29 29 3a c8 99 | 20 22 57 69 6d 70 5f 43 |.(.)):..| "Wimp_C|
|00000760| 6c 6f 73 65 44 6f 77 6e | 22 3a e0 0d 01 72 04 0d |loseDown|":...r..|
|00000770| 01 7c 23 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.|#.----|--------|
|00000780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000790| 2d 2d 0d 01 86 04 0d 01 | 90 67 de 20 63 6f 6f 72 |--......|.g. coor|
|000007a0| 64 25 20 33 31 3a f4 2a | 2a 20 43 6f 6f 72 64 69 |d% 31:.*|* Coordi|
|000007b0| 6e 61 74 65 20 62 6c 6f | 63 6b 20 66 6f 72 20 53 |nate blo|ck for S|
|000007c0| 59 53 20 22 46 6f 6e 74 | 5f 50 61 69 6e 74 22 20 |YS "Font|_Paint" |
|000007d0| 77 68 65 6e 2f 69 66 20 | 52 35 20 75 73 65 64 2e |when/if |R5 used.|
|000007e0| 20 38 20 66 6f 75 72 2d | 62 79 74 65 20 77 6f 72 | 8 four-|byte wor|
|000007f0| 64 73 20 6e 65 65 64 65 | 64 2e 20 2a 2a 0d 01 9a |ds neede|d. **...|
|00000800| 04 0d 01 a4 76 de 20 74 | 72 61 6e 73 66 6f 72 6d |....v. t|ransform|
|00000810| 25 20 32 33 3a f4 2a 2a | 20 54 72 61 6e 73 66 6f |% 23:.**| Transfo|
|00000820| 72 6d 61 74 69 6f 6e 20 | 6d 61 74 72 69 78 20 62 |rmation |matrix b|
|00000830| 6c 6f 63 6b 20 66 6f 72 | 20 53 59 53 20 22 46 6f |lock for| SYS "Fo|
|00000840| 6e 74 5f 50 61 69 6e 74 | 22 20 77 68 65 6e 2f 69 |nt_Paint|" when/i|
|00000850| 66 20 52 36 20 75 73 65 | 64 2e 20 36 20 66 6f 75 |f R6 use|d. 6 fou|
|00000860| 72 2d 62 79 74 65 20 77 | 6f 72 64 73 20 6e 65 65 |r-byte w|ords nee|
|00000870| 64 65 64 2e 20 2a 2a 0d | 01 ae 04 0d 01 b8 23 f4 |ded. **.|......#.|
|00000880| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 01 |--------|------..|
|000008a0| c2 04 0d 01 cc 7b f4 2a | 2a 20 53 65 74 20 75 70 |.....{.*|* Set up|
|000008b0| 20 66 6f 6e 74 28 73 29 | 20 74 6f 20 62 65 20 75 | font(s)| to be u|
|000008c0| 73 65 64 2e 20 28 52 65 | 67 61 72 64 20 74 68 69 |sed. (Re|gard thi|
|000008d0| 73 20 61 73 20 27 6f 70 | 65 6e 69 6e 67 27 20 66 |s as 'op|ening' f|
|000008e0| 6f 6e 74 20 64 61 74 61 | 20 66 69 6c 65 73 20 69 |ont data| files i|
|000008f0| 6e 20 70 72 65 70 61 72 | 61 74 69 6f 6e 20 66 6f |n prepar|ation fo|
|00000900| 72 20 72 65 61 64 69 6e | 67 20 6f 75 74 20 74 68 |r readin|g out th|
|00000910| 65 69 72 20 64 61 74 61 | 2e 29 20 2a 2a 0d 01 d6 |eir data|.) **...|
|00000920| 04 0d 01 e0 12 70 6f 69 | 6e 74 73 69 7a 65 31 25 |.....poi|ntsize1%|
|00000930| 3d 31 36 0d 01 ea 50 c8 | 99 20 22 46 6f 6e 74 5f |=16...P.|. "Font_|
|00000940| 46 69 6e 64 46 6f 6e 74 | 22 2c 2c 22 54 72 69 6e |FindFont|",,"Trin|
|00000950| 69 74 79 2e 4d 65 64 69 | 75 6d 22 2c 70 6f 69 6e |ity.Medi|um",poin|
|00000960| 74 73 69 7a 65 31 25 2a | 31 36 2c 70 6f 69 6e 74 |tsize1%*|16,point|
|00000970| 73 69 7a 65 31 25 2a 31 | 36 2c 30 2c 30 20 b8 20 |size1%*1|6,0,0 . |
|00000980| 66 31 25 0d 01 f4 04 0d | 01 fe 23 f4 2d 2d 2d 2d |f1%.....|..#.----|
|00000990| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 02 08 04 0d 02 |--------|--......|
|000009b0| 12 4c f4 2a 2a 20 50 72 | 6f 67 72 61 6d 20 6f 70 |.L.** Pr|ogram op|
|000009c0| 65 6e 73 20 57 69 6e 64 | 6f 77 20 69 6d 6d 65 64 |ens Wind|ow immed|
|000009d0| 69 61 74 65 6c 79 20 6f | 6e 20 61 63 74 69 76 61 |iately o|n activa|
|000009e0| 74 69 6f 6e 20 2d 2d 20 | 6e 6f 20 69 63 6f 6e 62 |tion -- |no iconb|
|000009f0| 61 72 20 69 63 6f 6e 20 | 2a 2a 0d 02 1c 1b 77 69 |ar icon |**....wi|
|00000a00| 64 74 68 25 3d 31 31 30 | 30 3a 68 65 69 67 68 74 |dth%=110|0:height|
|00000a10| 25 3d 38 30 30 0d 02 26 | 37 77 68 61 6e 64 6c 65 |%=800..&|7whandle|
|00000a20| 25 3d a4 63 72 65 61 74 | 65 5f 77 69 6e 64 6f 77 |%=.creat|e_window|
|00000a30| 28 31 30 30 2c 32 30 30 | 2c 77 69 64 74 68 25 2c |(100,200|,width%,|
|00000a40| 68 65 69 67 68 74 25 2c | 30 2c 30 29 0d 02 30 14 |height%,|0,0)..0.|
|00000a50| 21 62 6c 6f 63 6b 25 3d | 77 68 61 6e 64 6c 65 25 |!block%=|whandle%|
|00000a60| 0d 02 3a 24 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..:$.. "|Wimp_Get|
|00000a70| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 62 6c |WindowSt|ate",,bl|
|00000a80| 6f 63 6b 25 0d 02 44 20 | c8 99 20 22 57 69 6d 70 |ock%..D |.. "Wimp|
|00000a90| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00000aa0| 6f 63 6b 25 0d 02 4e 04 | 0d 02 58 05 e1 0d 02 62 |ock%..N.|..X....b|
|00000ab0| 04 0d 02 6c 2d f4 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |...l-.**|********|
|00000ac0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ad0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 02 |********|******..|
|00000ae0| 76 2d f4 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |v-.*****|********|
|00000af0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000b00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0d 02 80 04 0d |********|***.....|
|00000b10| 02 8a 0b dd 20 f2 70 6f | 6c 6c 0d 02 94 25 c8 99 |.... .po|ll...%..|
|00000b20| 20 22 57 69 6d 70 5f 50 | 6f 6c 6c 22 2c 30 2c 62 | "Wimp_P|oll",0,b|
|00000b30| 6c 6f 63 6b 25 20 b8 20 | 72 65 61 73 6f 6e 25 0d |lock% . |reason%.|
|00000b40| 02 9e 10 c8 8e 20 72 65 | 61 73 6f 6e 25 20 ca 0d |..... re|ason% ..|
|00000b50| 02 a8 13 20 20 20 20 c9 | 20 31 3a f2 72 65 64 72 |... .| 1:.redr|
|00000b60| 61 77 0d 02 b2 04 0d 02 | bc 0b 20 20 20 20 c9 20 |aw......|.. . |
|00000b70| 32 0d 02 c6 24 20 20 20 | 20 c8 99 20 22 57 69 6d |2...$ | .. "Wim|
|00000b80| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00000b90| 6c 6f 63 6b 25 0d 02 d0 | 04 0d 02 da 29 20 20 20 |lock%...|....) |
|00000ba0| 20 c9 20 33 3a c8 99 20 | 22 57 69 6d 70 5f 43 6c | . 3:.. |"Wimp_Cl|
|00000bb0| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00000bc0| 6b 25 0d 02 e4 0f 20 20 | 20 20 71 75 69 74 25 3d |k%.... | quit%=|
|00000bd0| b9 0d 02 ee 04 0d 02 f8 | 5a 20 20 20 20 c9 20 31 |........|Z . 1|
|00000be0| 37 2c 31 38 3a f2 6d 65 | 73 73 61 67 65 72 65 63 |7,18:.me|ssagerec|
|00000bf0| 65 69 76 65 3a f4 2a 2a | 20 55 73 65 64 20 6f 6e |eive:.**| Used on|
|00000c00| 6c 79 20 74 6f 20 61 6c | 6c 6f 77 20 54 61 73 6b |ly to al|low Task|
|00000c10| 20 4d 61 6e 61 67 65 72 | 20 63 6c 6f 73 75 72 65 | Manager| closure|
|00000c20| 20 69 66 20 72 65 71 75 | 69 72 65 64 20 2a 2a 0d | if requ|ired **.|
|00000c30| 03 02 05 cb 0d 03 0c 05 | e1 0d 03 16 04 0d 03 20 |........|....... |
|00000c40| 2d f4 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |-.******|********|
|00000c50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0d 03 2a 2d f4 2a |********|**..*-.*|
|00000c70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c90| 2a 2a 2a 2a 2a 2a 2a 0d | 03 34 04 0d 03 3e 0d dd |*******.|.4...>..|
|00000ca0| 20 f2 72 65 64 72 61 77 | 0d 03 48 a8 f4 2a 2a 20 | .redraw|..H..** |
|00000cb0| 53 74 61 6e 64 61 72 64 | 20 73 69 6d 70 6c 65 20 |Standard| simple |
|00000cc0| 52 65 64 72 61 77 20 72 | 6f 75 74 69 6e 65 2e 20 |Redraw r|outine. |
|00000cd0| 52 65 73 70 6f 6e 64 73 | 20 74 6f 20 52 65 61 73 |Responds| to Reas|
|00000ce0| 6f 6e 20 43 6f 64 65 20 | 31 20 69 2e 65 2e 20 66 |on Code |1 i.e. f|
|00000cf0| 6f 72 20 74 68 6f 73 65 | 20 77 69 6e 64 6f 77 73 |or those| windows|
|00000d00| 20 68 6f 6c 64 69 6e 67 | 20 74 65 78 74 20 6f 72 | holding| text or|
|00000d10| 20 67 72 61 70 68 69 63 | 20 64 61 74 61 20 67 65 | graphic| data ge|
|00000d20| 6e 65 72 61 74 65 64 20 | 62 79 20 70 72 6f 67 72 |nerated |by progr|
|00000d30| 61 6d 20 61 6e 64 20 6e | 6f 74 20 64 69 73 70 6c |am and n|ot displ|
|00000d40| 61 79 65 64 20 69 6e 20 | 69 63 6f 6e 73 20 2a 2a |ayed in |icons **|
|00000d50| 0d 03 52 04 0d 03 5c 2a | c8 99 20 22 57 69 6d 70 |..R...\*|.. "Wimp|
|00000d60| 5f 52 65 64 72 61 77 57 | 69 6e 64 6f 77 22 2c 2c |_RedrawW|indow",,|
|00000d70| 62 6c 6f 63 6b 25 20 b8 | 20 6d 6f 72 65 25 0d 03 |block% .| more%..|
|00000d80| 66 04 0d 03 70 7e 6f 78 | 25 3d 62 6c 6f 63 6b 25 |f...p~ox|%=block%|
|00000d90| 21 34 2d 62 6c 6f 63 6b | 25 21 32 30 3a f4 2a 2a |!4-block|%!20:.**|
|00000da0| 20 78 2d 76 61 6c 75 65 | 20 6f 66 20 4c 48 20 77 | x-value| of LH w|
|00000db0| 69 6e 64 6f 77 20 65 64 | 67 65 20 61 73 20 64 69 |indow ed|ge as di|
|00000dc0| 73 70 6c 61 79 65 64 20 | 6f 6e 20 73 63 72 65 65 |splayed |on scree|
|00000dd0| 6e 2c 20 69 6e 20 4f 53 | 20 75 6e 69 74 73 20 77 |n, in OS| units w|
|00000de0| 72 74 20 62 6f 74 74 6f | 6d 20 4c 48 20 63 6f 72 |rt botto|m LH cor|
|00000df0| 6e 65 72 20 6f 66 20 73 | 63 72 65 65 6e 20 2a 2a |ner of s|creen **|
|00000e00| 0d 03 7a 04 0d 03 84 80 | 6f 79 25 3d 62 6c 6f 63 |..z.....|oy%=bloc|
|00000e10| 6b 25 21 31 36 2d 62 6c | 6f 63 6b 25 21 32 34 3a |k%!16-bl|ock%!24:|
|00000e20| f4 2a 2a 20 79 2d 76 61 | 6c 75 65 20 6f 66 20 54 |.** y-va|lue of T|
|00000e30| 6f 70 20 77 69 6e 64 6f | 77 20 65 64 67 65 20 61 |op windo|w edge a|
|00000e40| 73 20 64 69 73 70 6c 61 | 79 65 64 20 6f 6e 20 73 |s displa|yed on s|
|00000e50| 63 72 65 65 6e 2c 20 69 | 6e 20 4f 53 20 75 6e 69 |creen, i|n OS uni|
|00000e60| 74 73 20 77 72 74 20 62 | 6f 74 74 6f 6d 20 4c 48 |ts wrt b|ottom LH|
|00000e70| 20 63 6f 72 6e 65 72 20 | 6f 66 20 73 63 72 65 65 | corner |of scree|
|00000e80| 6e 20 2a 2a 0d 03 8e 04 | 0d 03 98 04 0d 03 a2 0c |n **....|........|
|00000e90| c8 95 20 6d 6f 72 65 25 | 0d 03 ac 84 20 20 20 20 |.. more%|.... |
|00000ea0| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 46 6f 6e 74 |.. "Wimp|_SetFont|
|00000eb0| 43 6f 6c 6f 75 72 73 22 | 2c 2c 30 2c 37 3a f4 2a |Colours"|,,0,7:.*|
|00000ec0| 2a 20 46 6f 6e 74 20 42 | 61 63 6b 67 72 6f 75 6e |* Font B|ackgroun|
|00000ed0| 64 20 74 6f 20 50 61 6c | 65 74 74 65 20 30 20 28 |d to Pal|ette 0 (|
|00000ee0| 75 73 75 61 6c 6c 79 20 | 57 68 69 74 65 29 2c 20 |usually |White), |
|00000ef0| 46 6f 6e 74 20 46 6f 72 | 65 67 72 6f 75 6e 64 20 |Font For|eground |
|00000f00| 74 6f 20 50 61 6c 65 74 | 74 65 20 37 20 28 75 73 |to Palet|te 7 (us|
|00000f10| 75 61 6c 6c 79 20 42 6c | 61 63 6b 29 0d 03 b6 19 |ually Bl|ack)....|
|00000f20| 20 20 20 20 f2 64 69 73 | 70 6c 61 79 28 6f 78 25 | .dis|play(ox%|
|00000f30| 2c 6f 79 25 29 0d 03 c0 | 2e 20 20 20 20 c8 99 20 |,oy%)...|. .. |
|00000f40| 22 57 69 6d 70 5f 47 65 | 74 52 65 63 74 61 6e 67 |"Wimp_Ge|tRectang|
|00000f50| 6c 65 22 2c 2c 62 6c 6f | 63 6b 25 20 b8 20 6d 6f |le",,blo|ck% . mo|
|00000f60| 72 65 25 0d 03 ca 05 ce | 0d 03 d4 04 0d 03 de 05 |re%.....|........|
|00000f70| e1 0d 03 e8 04 0d 03 f2 | 2d f4 2a 2a 2a 2a 2a 2a |........|-.******|
|00000f80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000f90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000fa0| 2a 2a 0d 03 fc 04 0d 04 | 06 15 dd 20 f2 64 69 73 |**......|... .dis|
|00000fb0| 70 6c 61 79 28 78 25 2c | 79 25 29 0d 04 10 6e f4 |play(x%,|y%)...n.|
|00000fc0| 2a 2a 20 44 69 73 70 6c | 61 79 20 6e 65 65 64 73 |** Displ|ay needs|
|00000fd0| 20 74 6f 20 62 65 20 72 | 65 66 65 72 65 6e 63 65 | to be r|eference|
|00000fe0| 64 20 74 6f 20 77 69 6e | 64 6f 77 20 78 25 2c 79 |d to win|dow x%,y|
|00000ff0| 25 20 74 6f 20 65 6e 73 | 75 72 65 20 73 63 72 6f |% to ens|ure scro|
|00001000| 6c 6c 69 6e 67 20 61 6e | 64 20 64 72 61 67 67 69 |lling an|d draggi|
|00001010| 6e 67 20 74 61 6b 65 20 | 70 6c 61 63 65 20 70 72 |ng take |place pr|
|00001020| 6f 70 65 72 6c 79 20 2a | 2a 0d 04 1a 04 0d 04 24 |operly *|*......$|
|00001030| 19 c8 99 20 22 46 6f 6e | 74 5f 53 65 74 46 6f 6e |... "Fon|t_SetFon|
|00001040| 74 22 2c 66 31 25 0d 04 | 2e 04 0d 04 38 23 f4 2d |t",f1%..|....8#.-|
|00001050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 04 42 |--------|-----..B|
|00001070| b5 f4 2a 2a 20 42 69 74 | 20 34 20 6f 66 20 52 32 |..** Bit| 4 of R2|
|00001080| 20 6f 66 20 53 59 53 20 | 22 46 6f 6e 74 5f 50 61 | of SYS |"Font_Pa|
|00001090| 69 6e 74 22 20 69 73 20 | 61 6c 77 61 79 73 20 7a |int" is |always z|
|000010a0| 65 72 6f 20 69 6e 20 74 | 68 65 20 66 6f 6c 6c 6f |ero in t|he follo|
|000010b0| 77 69 6e 67 20 65 78 61 | 6d 70 6c 65 73 2e 20 48 |wing exa|mples. H|
|000010c0| 65 6e 63 65 20 61 6c 6c | 20 73 63 72 65 65 6e 20 |ence all| screen |
|000010d0| 75 6e 69 74 73 20 6e 65 | 65 64 20 74 6f 20 62 65 |units ne|ed to be|
|000010e0| 20 69 6e 20 6d 69 6c 6c | 69 70 6f 69 6e 74 73 20 | in mill|ipoints |
|000010f0| 62 79 20 74 68 65 20 74 | 69 6d 65 20 74 68 65 79 |by the t|ime they|
|00001100| 20 61 72 65 20 70 61 73 | 73 65 64 20 74 6f 20 53 | are pas|sed to S|
|00001110| 59 53 20 22 46 6f 6e 74 | 5f 50 61 69 6e 74 22 20 |YS "Font|_Paint" |
|00001120| 2a 2a 0d 04 4c 45 f4 2a | 2a 20 54 68 65 20 50 52 |**..LE.*|* The PR|
|00001130| 4f 43 73 2f 46 4e 73 20 | 74 61 6b 65 20 4f 53 20 |OCs/FNs |take OS |
|00001140| 55 6e 69 74 73 20 61 6e | 64 20 64 6f 20 6d 6f 73 |Units an|d do mos|
|00001150| 74 20 6f 66 20 74 68 65 | 20 63 6f 6e 76 65 72 73 |t of the| convers|
|00001160| 69 6f 6e 73 20 2a 2a 0d | 04 56 23 f4 2d 2d 2d 2d |ions **.|.V#.----|
|00001170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 04 60 04 0d 04 |--------|--..`...|
|00001190| 6a 14 74 65 73 74 24 3d | a4 73 74 72 69 6e 67 28 |j.test$=|.string(|
|000011a0| 31 29 0d 04 74 3f 70 6c | 6f 74 74 79 70 65 25 3d |1)..t?pl|ottype%=|
|000011b0| 30 3a f4 2a 2a 20 50 6c | 6f 74 20 61 74 20 52 33 |0:.** Pl|ot at R3|
|000011c0| 2c 52 34 20 2d 2d 2d 20 | 6e 6f 20 6f 74 68 65 72 |,R4 --- |no other|
|000011d0| 20 6a 75 73 74 69 66 69 | 63 61 74 69 6f 6e 20 2a | justifi|cation *|
|000011e0| 2a 0d 04 7e 3b c8 99 20 | 22 46 6f 6e 74 5f 50 61 |*..~;.. |"Font_Pa|
|000011f0| 69 6e 74 22 2c 2c 74 65 | 73 74 24 2c 70 6c 6f 74 |int",,te|st$,plot|
|00001200| 74 79 70 65 25 2c 34 30 | 30 2a 28 78 25 2b 30 29 |type%,40|0*(x%+0)|
|00001210| 2c 34 30 30 2a 28 79 25 | 2d 35 30 29 0d 04 88 04 |,400*(y%|-50)....|
|00001220| 0d 04 92 23 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...#.---|--------|
|00001230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001240| 2d 2d 2d 0d 04 9c 04 0d | 04 a6 14 74 65 73 74 24 |---.....|...test$|
|00001250| 3d a4 73 74 72 69 6e 67 | 28 32 29 0d 04 b0 aa 70 |=.string|(2)....p|
|00001260| 6c 6f 74 74 79 70 65 25 | 3d 26 32 3a f4 2a 2a 20 |lottype%|=&2:.** |
|00001270| 50 6c 6f 74 20 61 74 20 | 52 33 2c 52 34 20 26 20 |Plot at |R3,R4 & |
|00001280| 70 6c 6f 74 20 72 75 62 | 6f 75 74 20 62 6f 78 20 |plot rub|out box |
|00001290| 77 69 74 68 20 63 6f 72 | 6e 65 72 73 20 61 74 20 |with cor|ners at |
|000012a0| 6c 61 73 74 20 74 77 6f | 20 76 69 73 69 74 65 64 |last two| visited|
|000012b0| 20 67 72 61 70 68 69 63 | 20 63 75 72 73 6f 72 20 | graphic| cursor |
|000012c0| 70 6f 69 6e 74 73 20 28 | 68 65 72 65 20 64 65 66 |points (|here def|
|000012d0| 69 6e 65 64 20 62 79 20 | 74 77 6f 20 56 44 55 32 |ined by |two VDU2|
|000012e0| 35 20 63 61 6c 6c 73 29 | 2d 2d 2d 20 6e 6f 20 6f |5 calls)|--- no o|
|000012f0| 74 68 65 72 20 6a 75 73 | 74 69 66 69 63 61 74 69 |ther jus|tificati|
|00001300| 6f 6e 20 2a 2a 0d 04 ba | 16 ef 32 35 2c 34 2c 78 |on **...|..25,4,x|
|00001310| 25 2b 30 3b 79 25 2d 31 | 30 30 3b 0d 04 c4 17 ef |%+0;y%-1|00;.....|
|00001320| 32 35 2c 34 2c 78 25 2b | 32 30 30 3b 79 25 2d 36 |25,4,x%+|200;y%-6|
|00001330| 38 3b 0d 04 ce 3c c8 99 | 20 22 46 6f 6e 74 5f 50 |8;...<..| "Font_P|
|00001340| 61 69 6e 74 22 2c 2c 74 | 65 73 74 24 2c 70 6c 6f |aint",,t|est$,plo|
|00001350| 74 74 79 70 65 25 2c 34 | 30 30 2a 28 78 25 2b 30 |ttype%,4|00*(x%+0|
|00001360| 29 2c 34 30 30 2a 28 79 | 25 2d 31 30 30 29 0d 04 |),400*(y|%-100)..|
|00001370| d8 04 0d 04 e2 23 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.....#.-|--------|
|00001380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001390| 2d 2d 2d 2d 2d 0d 04 ec | 04 0d 04 f6 14 74 65 73 |-----...|.....tes|
|000013a0| 74 24 3d a4 73 74 72 69 | 6e 67 28 33 29 0d 05 00 |t$=.stri|ng(3)...|
|000013b0| 3d 70 6c 6f 74 74 79 70 | 65 25 3d 26 34 30 30 3a |=plottyp|e%=&400:|
|000013c0| f4 2a 2a 20 50 6c 6f 74 | 20 61 74 20 52 33 2c 52 |.** Plot| at R3,R|
|000013d0| 34 20 2d 2d 2d 20 77 72 | 69 74 69 6e 67 20 62 61 |4 --- wr|iting ba|
|000013e0| 63 6b 77 61 72 64 73 20 | 2a 2a 0d 05 0a 3e c8 99 |ckwards |**...>..|
|000013f0| 20 22 46 6f 6e 74 5f 50 | 61 69 6e 74 22 2c 2c 74 | "Font_P|aint",,t|
|00001400| 65 73 74 24 2c 70 6c 6f | 74 74 79 70 65 25 2c 34 |est$,plo|ttype%,4|
|00001410| 30 30 2a 28 78 25 2b 35 | 30 30 29 2c 34 30 30 2a |00*(x%+5|00),400*|
|00001420| 28 79 25 2d 31 35 30 29 | 0d 05 14 04 0d 05 1e 23 |(y%-150)|.......#|
|00001430| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00001440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00001450| 05 28 04 0d 05 32 14 74 | 65 73 74 24 3d a4 73 74 |.(...2.t|est$=.st|
|00001460| 72 69 6e 67 28 34 29 0d | 05 3c a1 70 6c 6f 74 74 |ring(4).|.<.plott|
|00001470| 79 70 65 25 3d 26 31 3a | f4 2a 2a 20 4a 75 73 74 |ype%=&1:|.** Just|
|00001480| 69 66 79 20 62 65 74 77 | 65 65 6e 20 52 33 2c 52 |ify betw|een R3,R|
|00001490| 34 20 61 6e 64 20 6c 61 | 73 74 20 70 6f 73 69 74 |4 and la|st posit|
|000014a0| 69 6f 6e 20 6f 66 20 67 | 72 61 70 68 69 63 73 20 |ion of g|raphics |
|000014b0| 63 75 72 73 6f 72 20 28 | 68 65 72 65 20 64 65 66 |cursor (|here def|
|000014c0| 69 6e 65 64 20 62 79 20 | 56 44 55 32 35 20 63 61 |ined by |VDU25 ca|
|000014d0| 6c 6c 2e 20 4d 61 72 6b | 65 72 20 70 6c 6f 74 74 |ll. Mark|er plott|
|000014e0| 65 64 20 61 74 20 56 44 | 55 32 35 20 70 6f 73 69 |ed at VD|U25 posi|
|000014f0| 74 69 6f 6e 20 66 6f 72 | 20 63 6f 6e 76 65 6e 69 |tion for| conveni|
|00001500| 65 6e 63 65 29 20 2a 2a | 0d 05 46 0f 6d 61 72 6b |ence) **|..F.mark|
|00001510| 65 72 24 3d 22 7c 22 0d | 05 50 4c c8 99 20 22 46 |er$="|".|.PL.. "F|
|00001520| 6f 6e 74 5f 50 61 69 6e | 74 22 2c 2c 6d 61 72 6b |ont_Pain|t",,mark|
|00001530| 65 72 24 2c 30 2c 34 30 | 30 2a 28 78 25 2b 35 30 |er$,0,40|0*(x%+50|
|00001540| 30 29 2c 34 30 30 2a 28 | 79 25 2d 32 30 30 29 3a |0),400*(|y%-200):|
|00001550| f4 2a 2a 20 50 6c 6f 74 | 73 20 6d 61 72 6b 65 72 |.** Plot|s marker|
|00001560| 20 2a 2a 0d 05 5a 18 ef | 32 35 2c 34 2c 78 25 2b | **..Z..|25,4,x%+|
|00001570| 35 30 30 3b 79 25 2d 32 | 30 30 3b 0d 05 64 43 c8 |500;y%-2|00;..dC.|
|00001580| 99 20 22 46 6f 6e 74 5f | 50 61 69 6e 74 22 2c 2c |. "Font_|Paint",,|
|00001590| 74 65 73 74 24 2c 70 6c | 6f 74 74 79 70 65 25 2c |test$,pl|ottype%,|
|000015a0| 34 30 30 2a 28 78 25 2b | 30 29 2c 34 30 30 2a 28 |400*(x%+|0),400*(|
|000015b0| 79 25 2d 32 30 30 29 2c | 63 6f 6f 72 64 25 0d 05 |y%-200),|coord%..|
|000015c0| 6e 04 0d 05 78 23 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |n...x#.-|--------|
|000015d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015e0| 2d 2d 2d 2d 2d 0d 05 82 | 04 0d 05 8c 14 74 65 73 |-----...|.....tes|
|000015f0| 74 24 3d a4 73 74 72 69 | 6e 67 28 35 29 0d 05 96 |t$=.stri|ng(5)...|
|00001600| 04 0d 05 a0 88 70 6c 6f | 74 74 79 70 65 25 3d 26 |.....plo|ttype%=&|
|00001610| 32 30 3a f4 2a 2a 20 50 | 6c 6f 74 20 61 74 20 52 |20:.** P|lot at R|
|00001620| 33 2c 52 34 20 61 6e 64 | 20 75 73 65 20 63 6f 6f |3,R4 and| use coo|
|00001630| 72 64 69 6e 61 74 65 20 | 70 61 72 61 6d 65 74 65 |rdinate |paramete|
|00001640| 72 20 62 6c 6f 63 6b 20 | 61 74 20 52 35 20 74 6f |r block |at R5 to|
|00001650| 20 64 65 66 69 6e 65 20 | 6c 65 74 74 65 72 20 73 | define |letter s|
|00001660| 70 61 63 69 6e 67 20 61 | 6e 64 2f 6f 72 20 61 64 |pacing a|nd/or ad|
|00001670| 64 69 74 69 6f 6e 61 6c | 20 27 73 70 61 63 65 73 |ditional| 'spaces|
|00001680| 27 20 73 69 7a 65 20 2a | 2a 0d 05 aa 20 f2 73 65 |' size *|*... .se|
|00001690| 74 63 6f 6f 72 64 28 30 | 2c 30 2c 33 32 2c 2d 38 |tcoord(0|,0,32,-8|
|000016a0| 2c 30 2c 30 2c 30 2c 30 | 29 0d 05 b4 43 c8 99 20 |,0,0,0,0|)...C.. |
|000016b0| 22 46 6f 6e 74 5f 50 61 | 69 6e 74 22 2c 2c 74 65 |"Font_Pa|int",,te|
|000016c0| 73 74 24 2c 70 6c 6f 74 | 74 79 70 65 25 2c 34 30 |st$,plot|type%,40|
|000016d0| 30 2a 28 78 25 2b 30 29 | 2c 34 30 30 2a 28 79 25 |0*(x%+0)|,400*(y%|
|000016e0| 2d 32 35 30 29 2c 63 6f | 6f 72 64 25 0d 05 be 04 |-250),co|ord%....|
|000016f0| 0d 05 c8 23 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...#.---|--------|
|00001700| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001710| 2d 2d 2d 0d 05 d2 04 0d | 05 dc 14 74 65 73 74 24 |---.....|...test$|
|00001720| 3d a4 73 74 72 69 6e 67 | 28 36 29 0d 05 e6 cc 70 |=.string|(6)....p|
|00001730| 6c 6f 74 74 79 70 65 25 | 3d 26 32 32 3a f4 2a 2a |lottype%|=&22:.**|
|00001740| 20 41 73 20 70 72 65 76 | 69 6f 75 73 2c 20 62 75 | As prev|ious, bu|
|00001750| 74 20 61 6c 73 6f 20 70 | 6c 6f 74 20 72 75 62 6f |t also p|lot rubo|
|00001760| 75 74 20 62 6f 78 20 28 | 69 6e 20 66 6f 6e 74 20 |ut box (|in font |
|00001770| 62 61 63 6b 67 72 6f 75 | 6e 64 20 63 6f 6c 6f 75 |backgrou|nd colou|
|00001780| 72 29 20 77 69 74 68 20 | 63 6f 72 6e 65 72 73 20 |r) with |corners |
|00001790| 64 65 66 69 6e 65 64 20 | 69 6e 20 63 6f 6f 72 64 |defined |in coord|
|000017a0| 69 6e 61 74 65 20 70 61 | 72 61 6d 65 74 65 72 20 |inate pa|rameter |
|000017b0| 62 6c 6f 63 6b 2e 20 46 | 6f 6e 74 20 62 61 63 6b |block. F|ont back|
|000017c0| 67 72 6f 75 6e 64 20 63 | 6f 6c 6f 75 72 20 72 65 |ground c|olour re|
|000017d0| 64 65 66 69 6e 65 64 20 | 74 65 6d 70 6f 72 61 72 |defined |temporar|
|000017e0| 69 6c 79 20 68 65 72 65 | 2c 20 66 6f 72 20 65 66 |ily here|, for ef|
|000017f0| 66 65 63 74 20 2a 2a 0d | 05 f0 22 c8 99 20 22 57 |fect **.|..".. "W|
|00001800| 69 6d 70 5f 53 65 74 46 | 6f 6e 74 43 6f 6c 6f 75 |imp_SetF|ontColou|
|00001810| 72 73 22 2c 2c 31 33 2c | 37 0d 05 fa 04 0d 06 04 |rs",,13,|7.......|
|00001820| 32 f2 73 65 74 63 6f 6f | 72 64 28 30 2c 30 2c 33 |2.setcoo|rd(0,0,3|
|00001830| 32 2c 2d 38 2c 78 25 2b | 30 2c 79 25 2d 33 39 30 |2,-8,x%+|0,y%-390|
|00001840| 2c 78 25 2b 32 32 34 2c | 79 25 2d 33 31 38 29 0d |,x%+224,|y%-318).|
|00001850| 06 0e 43 c8 99 20 22 46 | 6f 6e 74 5f 50 61 69 6e |..C.. "F|ont_Pain|
|00001860| 74 22 2c 2c 74 65 73 74 | 24 2c 70 6c 6f 74 74 79 |t",,test|$,plotty|
|00001870| 70 65 25 2c 34 30 30 2a | 28 78 25 2b 30 29 2c 34 |pe%,400*|(x%+0),4|
|00001880| 30 30 2a 28 79 25 2d 33 | 35 30 29 2c 63 6f 6f 72 |00*(y%-3|50),coor|
|00001890| 64 25 0d 06 18 04 0d 06 | 22 45 c8 99 20 22 57 69 |d%......|"E.. "Wi|
|000018a0| 6d 70 5f 53 65 74 46 6f | 6e 74 43 6f 6c 6f 75 72 |mp_SetFo|ntColour|
|000018b0| 73 22 2c 2c 30 2c 37 3a | f4 2a 2a 20 52 65 73 65 |s",,0,7:|.** Rese|
|000018c0| 74 20 46 6f 6e 74 20 62 | 61 63 6b 67 72 6f 75 6e |t Font b|ackgroun|
|000018d0| 64 20 63 6f 6c 6f 75 72 | 20 2a 2a 0d 06 2c 04 0d |d colour| **..,..|
|000018e0| 06 36 23 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.6#.----|--------|
|000018f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001900| 2d 2d 0d 06 40 04 0d 06 | 4a 29 74 65 73 74 24 3d |--..@...|J)test$=|
|00001910| a4 73 74 72 69 6e 67 28 | 37 29 3a f4 2a 2a 20 53 |.string(|7):.** S|
|00001920| 69 6e 67 6c 65 20 6c 65 | 74 74 65 72 20 2a 2a 0d |ingle le|tter **.|
|00001930| 06 54 a3 70 6c 6f 74 74 | 79 70 65 25 3d 26 34 30 |.T.plott|ype%=&40|
|00001940| 3a f4 2a 2a 20 50 6c 6f | 74 20 73 74 72 69 6e 67 |:.** Plo|t string|
|00001950| 20 61 74 20 52 33 2c 52 | 34 20 61 66 74 65 72 20 | at R3,R|4 after |
|00001960| 74 72 61 6e 73 66 6f 72 | 6d 61 74 69 6f 6e 20 77 |transfor|mation w|
|00001970| 69 74 68 20 70 61 72 61 | 6d 65 74 65 72 73 20 68 |ith para|meters h|
|00001980| 65 6c 64 20 69 6e 20 74 | 72 61 6e 73 66 6f 72 6d |eld in t|ransform|
|00001990| 61 74 69 6f 6e 20 70 61 | 72 61 6d 65 74 65 72 20 |ation pa|rameter |
|000019a0| 62 6c 6f 63 6b 20 61 74 | 20 52 36 2e 20 44 4f 4e |block at| R6. DON|
|000019b0| 27 54 20 46 4f 52 47 45 | 54 20 43 4f 4d 4d 41 20 |'T FORGE|T COMMA |
|000019c0| 46 4f 52 20 55 4e 55 53 | 45 44 20 52 35 21 21 20 |FOR UNUS|ED R5!! |
|000019d0| 2a 2a 0d 06 5e 04 0d 06 | 68 20 f2 73 65 74 74 72 |**..^...|h .settr|
|000019e0| 61 6e 73 66 6f 72 6d 28 | 32 2c 32 2c 30 2c 34 30 |ansform(|2,2,0,40|
|000019f0| 30 2c 33 30 30 29 0d 06 | 72 4c c8 99 20 22 46 6f |0,300)..|rL.. "Fo|
|00001a00| 6e 74 5f 50 61 69 6e 74 | 22 2c 2c 74 65 73 74 24 |nt_Paint|",,test$|
|00001a10| 2c 70 6c 6f 74 74 79 70 | 65 25 2c 34 30 30 2a 28 |,plottyp|e%,400*(|
|00001a20| 78 25 2b 30 29 2c 34 30 | 30 2a 28 79 25 2d 68 65 |x%+0),40|0*(y%-he|
|00001a30| 69 67 68 74 25 29 2c 2c | 74 72 61 6e 73 66 6f 72 |ight%),,|transfor|
|00001a40| 6d 25 0d 06 7c 20 f2 73 | 65 74 74 72 61 6e 73 66 |m%..| .s|ettransf|
|00001a50| 6f 72 6d 28 34 2c 34 2c | 30 2c 34 30 30 2c 33 30 |orm(4,4,|0,400,30|
|00001a60| 30 29 0d 06 86 4c c8 99 | 20 22 46 6f 6e 74 5f 50 |0)...L..| "Font_P|
|00001a70| 61 69 6e 74 22 2c 2c 74 | 65 73 74 24 2c 70 6c 6f |aint",,t|est$,plo|
|00001a80| 74 74 79 70 65 25 2c 34 | 30 30 2a 28 78 25 2b 30 |ttype%,4|00*(x%+0|
|00001a90| 29 2c 34 30 30 2a 28 79 | 25 2d 68 65 69 67 68 74 |),400*(y|%-height|
|00001aa0| 25 29 2c 2c 74 72 61 6e | 73 66 6f 72 6d 25 0d 06 |%),,tran|sform%..|
|00001ab0| 90 21 f2 73 65 74 74 72 | 61 6e 73 66 6f 72 6d 28 |.!.settr|ansform(|
|00001ac0| 32 2c 32 2c 34 35 2c 34 | 30 30 2c 33 30 30 29 0d |2,2,45,4|00,300).|
|00001ad0| 06 9a 4c c8 99 20 22 46 | 6f 6e 74 5f 50 61 69 6e |..L.. "F|ont_Pain|
|00001ae0| 74 22 2c 2c 74 65 73 74 | 24 2c 70 6c 6f 74 74 79 |t",,test|$,plotty|
|00001af0| 70 65 25 2c 34 30 30 2a | 28 78 25 2b 30 29 2c 34 |pe%,400*|(x%+0),4|
|00001b00| 30 30 2a 28 79 25 2d 68 | 65 69 67 68 74 25 29 2c |00*(y%-h|eight%),|
|00001b10| 2c 74 72 61 6e 73 66 6f | 72 6d 25 0d 06 a4 04 0d |,transfo|rm%.....|
|00001b20| 06 ae 22 74 65 73 74 24 | 3d a4 73 74 72 69 6e 67 |.."test$|=.string|
|00001b30| 28 38 29 3a f4 2a 2a 20 | 41 20 77 6f 72 64 20 2a |(8):.** |A word *|
|00001b40| 2a 0d 06 b8 20 f2 73 65 | 74 74 72 61 6e 73 66 6f |*... .se|ttransfo|
|00001b50| 72 6d 28 32 2c 34 2c 30 | 2c 37 30 30 2c 33 30 30 |rm(2,4,0|,700,300|
|00001b60| 29 0d 06 c2 4c c8 99 20 | 22 46 6f 6e 74 5f 50 61 |)...L.. |"Font_Pa|
|00001b70| 69 6e 74 22 2c 2c 74 65 | 73 74 24 2c 70 6c 6f 74 |int",,te|st$,plot|
|00001b80| 74 79 70 65 25 2c 34 30 | 30 2a 28 78 25 2b 30 29 |type%,40|0*(x%+0)|
|00001b90| 2c 34 30 30 2a 28 79 25 | 2d 68 65 69 67 68 74 25 |,400*(y%|-height%|
|00001ba0| 29 2c 2c 74 72 61 6e 73 | 66 6f 72 6d 25 0d 06 cc |),,trans|form%...|
|00001bb0| 21 f2 73 65 74 74 72 61 | 6e 73 66 6f 72 6d 28 32 |!.settra|nsform(2|
|00001bc0| 2c 34 2c 39 30 2c 37 30 | 30 2c 33 30 30 29 0d 06 |,4,90,70|0,300)..|
|00001bd0| d6 4c c8 99 20 22 46 6f | 6e 74 5f 50 61 69 6e 74 |.L.. "Fo|nt_Paint|
|00001be0| 22 2c 2c 74 65 73 74 24 | 2c 70 6c 6f 74 74 79 70 |",,test$|,plottyp|
|00001bf0| 65 25 2c 34 30 30 2a 28 | 78 25 2b 30 29 2c 34 30 |e%,400*(|x%+0),40|
|00001c00| 30 2a 28 79 25 2d 68 65 | 69 67 68 74 25 29 2c 2c |0*(y%-he|ight%),,|
|00001c10| 74 72 61 6e 73 66 6f 72 | 6d 25 0d 06 e0 22 f2 73 |transfor|m%...".s|
|00001c20| 65 74 74 72 61 6e 73 66 | 6f 72 6d 28 32 2c 34 2c |ettransf|orm(2,4,|
|00001c30| 2d 33 30 2c 37 30 30 2c | 33 30 30 29 0d 06 ea 4c |-30,700,|300)...L|
|00001c40| c8 99 20 22 46 6f 6e 74 | 5f 50 61 69 6e 74 22 2c |.. "Font|_Paint",|
|00001c50| 2c 74 65 73 74 24 2c 70 | 6c 6f 74 74 79 70 65 25 |,test$,p|lottype%|
|00001c60| 2c 34 30 30 2a 28 78 25 | 2b 30 29 2c 34 30 30 2a |,400*(x%|+0),400*|
|00001c70| 28 79 25 2d 68 65 69 67 | 68 74 25 29 2c 2c 74 72 |(y%-heig|ht%),,tr|
|00001c80| 61 6e 73 66 6f 72 6d 25 | 0d 06 f4 04 0d 06 fe 23 |ansform%|.......#|
|00001c90| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00001ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00001cb0| 07 08 04 0d 07 12 51 74 | 65 73 74 24 3d a4 73 74 |......Qt|est$=.st|
|00001cc0| 72 69 6e 67 28 39 29 3a | f4 2a 2a 20 49 6e 63 6c |ring(9):|.** Incl|
|00001cd0| 75 64 65 73 20 56 44 55 | 39 20 26 20 56 44 55 31 |udes VDU|9 & VDU1|
|00001ce0| 31 20 63 6f 6e 74 72 6f | 6c 20 63 6f 64 65 73 20 |1 contro|l codes |
|00001cf0| 74 6f 20 6a 75 73 74 69 | 66 79 20 73 74 72 69 6e |to justi|fy strin|
|00001d00| 67 20 2a 2a 0d 07 1c 68 | 70 6c 6f 74 74 79 70 65 |g **...h|plottype|
|00001d10| 25 3d 30 3a f4 2a 2a 20 | 50 6c 6f 74 20 61 74 20 |%=0:.** |Plot at |
|00001d20| 52 33 2c 52 34 20 2d 2d | 2d 20 6a 75 73 74 69 66 |R3,R4 --|- justif|
|00001d30| 69 63 61 74 69 6f 6e 20 | 63 61 72 72 69 65 64 20 |ication |carried |
|00001d40| 6f 75 74 20 62 79 20 75 | 73 65 20 6f 66 20 56 44 |out by u|se of VD|
|00001d50| 55 20 63 6f 6e 74 72 6f | 6c 20 63 6f 64 65 73 20 |U contro|l codes |
|00001d60| 69 6e 20 73 74 72 69 6e | 67 20 2a 2a 0d 07 26 3c |in strin|g **..&<|
|00001d70| c8 99 20 22 46 6f 6e 74 | 5f 50 61 69 6e 74 22 2c |.. "Font|_Paint",|
|00001d80| 2c 74 65 73 74 24 2c 70 | 6c 6f 74 74 79 70 65 25 |,test$,p|lottype%|
|00001d90| 2c 34 30 30 2a 28 78 25 | 2b 30 29 2c 34 30 30 2a |,400*(x%|+0),400*|
|00001da0| 28 79 25 2d 35 35 30 29 | 0d 07 30 04 0d 07 3a 23 |(y%-550)|..0...:#|
|00001db0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00001dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00001dd0| 07 44 04 0d 07 4e 4a 74 | 65 73 74 24 3d a4 73 74 |.D...NJt|est$=.st|
|00001de0| 72 69 6e 67 28 31 30 29 | 3a f4 2a 2a 20 49 6e 63 |ring(10)|:.** Inc|
|00001df0| 6c 75 64 65 73 20 56 44 | 55 31 39 20 63 6f 6e 74 |ludes VD|U19 cont|
|00001e00| 72 6f 6c 20 63 6f 64 65 | 73 20 74 6f 20 63 68 61 |rol code|s to cha|
|00001e10| 6e 67 65 20 63 6f 6c 6f | 75 72 20 2a 2a 0d 07 58 |nge colo|ur **..X|
|00001e20| 4b 70 6c 6f 74 74 79 70 | 65 25 3d 30 3a f4 2a 2a |Kplottyp|e%=0:.**|
|00001e30| 20 50 6c 6f 74 20 61 74 | 20 52 33 2c 52 34 20 2d | Plot at| R3,R4 -|
|00001e40| 2d 2d 20 63 6f 6e 74 72 | 6f 6c 20 63 6f 64 65 73 |-- contr|ol codes|
|00001e50| 20 69 6e 20 73 74 72 69 | 6e 67 20 61 6c 74 65 72 | in stri|ng alter|
|00001e60| 20 70 6c 6f 74 20 2a 2a | 0d 07 62 3c c8 99 20 22 | plot **|..b<.. "|
|00001e70| 46 6f 6e 74 5f 50 61 69 | 6e 74 22 2c 2c 74 65 73 |Font_Pai|nt",,tes|
|00001e80| 74 24 2c 70 6c 6f 74 74 | 79 70 65 25 2c 34 30 30 |t$,plott|ype%,400|
|00001e90| 2a 28 78 25 2b 30 29 2c | 34 30 30 2a 28 79 25 2d |*(x%+0),|400*(y%-|
|00001ea0| 36 32 35 29 0d 07 6c 04 | 0d 07 76 4a 74 65 73 74 |625)..l.|..vJtest|
|00001eb0| 24 3d a4 73 74 72 69 6e | 67 28 31 31 29 3a f4 2a |$=.strin|g(11):.*|
|00001ec0| 2a 20 49 6e 63 6c 75 64 | 65 73 20 56 44 55 31 39 |* Includ|es VDU19|
|00001ed0| 20 63 6f 6e 74 72 6f 6c | 20 63 6f 64 65 73 20 74 | control| codes t|
|00001ee0| 6f 20 63 68 61 6e 67 65 | 20 63 6f 6c 6f 75 72 20 |o change| colour |
|00001ef0| 2a 2a 0d 07 80 4b 70 6c | 6f 74 74 79 70 65 25 3d |**...Kpl|ottype%=|
|00001f00| 30 3a f4 2a 2a 20 50 6c | 6f 74 20 61 74 20 52 33 |0:.** Pl|ot at R3|
|00001f10| 2c 52 34 20 2d 2d 2d 20 | 63 6f 6e 74 72 6f 6c 20 |,R4 --- |control |
|00001f20| 63 6f 64 65 73 20 69 6e | 20 73 74 72 69 6e 67 20 |codes in| string |
|00001f30| 61 6c 74 65 72 20 70 6c | 6f 74 20 2a 2a 0d 07 8a |alter pl|ot **...|
|00001f40| 3c c8 99 20 22 46 6f 6e | 74 5f 50 61 69 6e 74 22 |<.. "Fon|t_Paint"|
|00001f50| 2c 2c 74 65 73 74 24 2c | 70 6c 6f 74 74 79 70 65 |,,test$,|plottype|
|00001f60| 25 2c 34 30 30 2a 28 78 | 25 2b 30 29 2c 34 30 30 |%,400*(x|%+0),400|
|00001f70| 2a 28 79 25 2d 36 37 35 | 29 0d 07 94 04 0d 07 9e |*(y%-675|).......|
|00001f80| 23 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |#.------|--------|
|00001f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001fa0| 0d 07 a8 04 0d 07 b2 15 | 74 65 73 74 24 3d a4 73 |........|test$=.s|
|00001fb0| 74 72 69 6e 67 28 31 32 | 29 0d 07 bc 0f 70 6c 6f |tring(12|)....plo|
|00001fc0| 74 74 79 70 65 25 3d 30 | 0d 07 c6 3c c8 99 20 22 |ttype%=0|...<.. "|
|00001fd0| 46 6f 6e 74 5f 50 61 69 | 6e 74 22 2c 2c 74 65 73 |Font_Pai|nt",,tes|
|00001fe0| 74 24 2c 70 6c 6f 74 74 | 79 70 65 25 2c 34 30 30 |t$,plott|ype%,400|
|00001ff0| 2a 28 78 25 2b 30 29 2c | 34 30 30 2a 28 79 25 2d |*(x%+0),|400*(y%-|
|00002000| 37 32 35 29 0d 07 d0 12 | 70 6c 6f 74 74 79 70 65 |725)....|plottype|
|00002010| 25 3d 26 32 30 30 0d 07 | da 3c c8 99 20 22 46 6f |%=&200..|.<.. "Fo|
|00002020| 6e 74 5f 50 61 69 6e 74 | 22 2c 2c 74 65 73 74 24 |nt_Paint|",,test$|
|00002030| 2c 70 6c 6f 74 74 79 70 | 65 25 2c 34 30 30 2a 28 |,plottyp|e%,400*(|
|00002040| 78 25 2b 30 29 2c 34 30 | 30 2a 28 79 25 2d 37 37 |x%+0),40|0*(y%-77|
|00002050| 35 29 0d 07 e4 05 e1 0d | 07 ee 04 0d 07 f8 2d f4 |5)......|......-.|
|00002060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002070| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002080| 2a 2a 2a 2a 2a 2a 2a 2a | 0d 08 02 04 0d 08 0c 11 |********|........|
|00002090| dd 20 a4 73 74 72 69 6e | 67 28 6e 25 29 0d 08 16 |. .strin|g(n%)...|
|000020a0| 04 0d 08 20 0b c8 8e 20 | 6e 25 20 ca 0d 08 2a 04 |... ... |n% ...*.|
|000020b0| 0d 08 34 1b 20 20 20 20 | c9 20 31 3a 73 74 72 69 |..4. |. 1:stri|
|000020c0| 6e 67 24 3d 22 4c 69 6e | 65 31 22 0d 08 3e 04 0d |ng$="Lin|e1"..>..|
|000020d0| 08 48 1b 20 20 20 20 c9 | 20 32 3a 73 74 72 69 6e |.H. .| 2:strin|
|000020e0| 67 24 3d 22 4c 69 6e 65 | 32 22 0d 08 52 04 0d 08 |g$="Line|2"..R...|
|000020f0| 5c 1b 20 20 20 20 c9 20 | 33 3a 73 74 72 69 6e 67 |\. . |3:string|
|00002100| 24 3d 22 4c 69 6e 65 33 | 22 0d 08 66 04 0d 08 70 |$="Line3|"..f...p|
|00002110| 1d 20 20 20 20 c9 20 34 | 3a 73 74 72 69 6e 67 24 |. . 4|:string$|
|00002120| 3d 22 20 4c 69 6e 65 34 | 20 22 0d 08 7a 04 0d 08 |=" Line4| "..z...|
|00002130| 84 1b 20 20 20 20 c9 20 | 35 3a 73 74 72 69 6e 67 |.. . |5:string|
|00002140| 24 3d 22 4c 69 6e 65 35 | 22 0d 08 8e 04 0d 08 98 |$="Line5|".......|
|00002150| 1b 20 20 20 20 c9 20 36 | 3a 73 74 72 69 6e 67 24 |. . 6|:string$|
|00002160| 3d 22 4c 69 6e 65 36 22 | 0d 08 a2 04 0d 08 ac 17 |="Line6"|........|
|00002170| 20 20 20 20 c9 20 37 3a | 73 74 72 69 6e 67 24 3d | . 7:|string$=|
|00002180| 22 37 22 0d 08 b6 04 0d | 08 c0 1b 20 20 20 20 c9 |"7".....|... .|
|00002190| 20 38 3a 73 74 72 69 6e | 67 24 3d 22 4c 69 6e 65 | 8:strin|g$="Line|
|000021a0| 38 22 0d 08 ca 04 0d 08 | d4 0b 20 20 20 20 c9 20 |8"......|.. . |
|000021b0| 39 0d 08 de 49 20 20 20 | 20 78 67 61 70 25 3d 31 |9...I | xgap%=1|
|000021c0| 39 36 3a f4 2a 2a 20 52 | 65 71 75 69 72 65 64 20 |96:.** R|equired |
|000021d0| 78 2d 73 68 69 66 74 20 | 69 6e 20 4f 53 20 75 6e |x-shift |in OS un|
|000021e0| 69 74 73 20 28 6e 65 67 | 61 74 69 76 65 20 69 73 |its (neg|ative is|
|000021f0| 20 27 6c 65 66 74 27 29 | 2a 2a 0d 08 e8 4a 20 20 | 'left')|**...J |
|00002200| 20 20 79 67 61 70 25 3d | 2d 33 32 3a f4 2a 2a 20 | ygap%=|-32:.** |
|00002210| 52 65 71 75 69 72 65 64 | 20 79 2d 73 68 69 66 74 |Required| y-shift|
|00002220| 20 69 6e 20 4f 53 20 75 | 6e 69 74 73 20 28 6e 65 | in OS u|nits (ne|
|00002230| 67 61 74 69 76 65 20 69 | 73 20 27 64 6f 77 6e 27 |gative i|s 'down'|
|00002240| 29 20 2a 2a 0d 08 f2 36 | 20 20 20 20 78 6d 6f 76 |) **...6| xmov|
|00002250| 65 25 3d 78 67 61 70 25 | 2a 34 30 30 3a f4 2a 2a |e%=xgap%|*400:.**|
|00002260| 20 43 6f 6e 76 65 72 74 | 20 74 6f 20 6d 69 6c 6c | Convert| to mill|
|00002270| 69 70 6f 69 6e 74 73 20 | 2a 2a 0d 08 fc 18 20 20 |ipoints |**.... |
|00002280| 20 20 79 6d 6f 76 65 25 | 3d 79 67 61 70 25 2a 34 | ymove%|=ygap%*4|
|00002290| 30 30 0d 09 06 04 0d 09 | 10 64 20 20 20 20 78 6d |00......|.d xm|
|000022a0| 6f 76 65 24 3d bd 28 39 | 29 2b bd 28 78 6d 6f 76 |ove$=.(9|)+.(xmov|
|000022b0| 65 25 20 80 20 26 46 46 | 29 2b bd 28 28 78 6d 6f |e% . &FF|)+.((xmo|
|000022c0| 76 65 25 20 80 20 26 46 | 46 30 30 29 3e 3e 38 29 |ve% . &F|F00)>>8)|
|000022d0| 2b bd 28 28 78 6d 6f 76 | 65 25 20 80 20 26 46 46 |+.((xmov|e% . &FF|
|000022e0| 30 30 30 30 29 3e 3e 31 | 36 29 3a f4 2a 2a 20 53 |0000)>>1|6):.** S|
|000022f0| 65 65 20 74 65 78 74 20 | 2a 2a 0d 09 1a 65 20 20 |ee text |**...e |
|00002300| 20 20 79 6d 6f 76 65 24 | 3d bd 28 31 31 29 2b bd | ymove$|=.(11)+.|
|00002310| 28 79 6d 6f 76 65 25 20 | 80 20 26 46 46 29 2b bd |(ymove% |. &FF)+.|
|00002320| 28 28 79 6d 6f 76 65 25 | 20 80 20 26 46 46 30 30 |((ymove%| . &FF00|
|00002330| 29 3e 3e 38 29 2b bd 28 | 28 79 6d 6f 76 65 25 20 |)>>8)+.(|(ymove% |
|00002340| 80 20 26 46 46 30 30 30 | 30 29 3e 3e 31 36 29 3a |. &FF000|0)>>16):|
|00002350| f4 2a 2a 20 53 65 65 20 | 74 65 78 74 20 2a 2a 0d |.** See |text **.|
|00002360| 09 24 04 0d 09 2e 3f 20 | 20 20 20 73 74 72 69 6e |.$....? | strin|
|00002370| 67 24 3d 22 4c 69 6e 65 | 39 20 2d 2d 2d 2d 22 2b |g$="Line|9 ----"+|
|00002380| 78 6d 6f 76 65 24 2b 22 | 4c 69 6e 65 39 22 2b 79 |xmove$+"|Line9"+y|
|00002390| 6d 6f 76 65 24 2b 22 2d | 2d 2d 2d 20 4c 69 6e 65 |move$+"-|--- Line|
|000023a0| 39 22 0d 09 38 04 0d 09 | 42 0c 20 20 20 20 c9 20 |9"..8...|B. . |
|000023b0| 31 30 0d 09 4c 77 20 20 | 20 20 63 6f 6c 6f 75 72 |10..Lw | colour|
|000023c0| 63 68 61 6e 67 65 31 24 | 3d bd 28 31 39 29 2b bd |change1$|=.(19)+.|
|000023d0| 28 32 35 35 29 2b bd 28 | 32 35 35 29 2b bd 28 32 |(255)+.(|255)+.(2|
|000023e0| 35 35 29 2b bd 28 31 31 | 39 29 2b bd 28 31 31 39 |55)+.(11|9)+.(119|
|000023f0| 29 2b bd 28 31 31 39 29 | 2b bd 28 30 29 3a f4 2a |)+.(119)|+.(0):.*|
|00002400| 2a 20 57 68 69 74 65 20 | 62 61 63 6b 67 72 6f 75 |* White |backgrou|
|00002410| 6e 64 2c 6d 69 64 2d 67 | 72 65 79 20 66 6f 72 65 |nd,mid-g|rey fore|
|00002420| 67 72 6f 75 6e 64 20 2a | 2a 0d 09 56 74 20 20 20 |ground *|*..Vt |
|00002430| 20 63 6f 6c 6f 75 72 63 | 68 61 6e 67 65 32 24 3d | colourc|hange2$=|
|00002440| bd 28 31 39 29 2b bd 28 | 32 35 35 29 2b bd 28 32 |.(19)+.(|255)+.(2|
|00002450| 35 35 29 2b bd 28 32 35 | 35 29 2b bd 28 32 35 35 |55)+.(25|5)+.(255|
|00002460| 29 2b bd 28 32 35 35 29 | 2b bd 28 32 35 35 29 2b |)+.(255)|+.(255)+|
|00002470| bd 28 30 29 3a f4 2a 2a | 20 57 68 69 74 65 20 62 |.(0):.**| White b|
|00002480| 61 63 6b 67 72 6f 75 6e | 64 2c 77 68 69 74 65 20 |ackgroun|d,white |
|00002490| 66 6f 72 65 67 72 6f 75 | 6e 64 20 2a 2a 0d 09 60 |foregrou|nd **..`|
|000024a0| 04 0d 09 6a 55 20 20 20 | 20 73 74 72 69 6e 67 24 |...jU | string$|
|000024b0| 3d 22 4c 69 6e 65 31 30 | 20 2d 2d 22 2b 63 6f 6c |="Line10| --"+col|
|000024c0| 6f 75 72 63 68 61 6e 67 | 65 31 24 2b 22 4c 69 6e |ourchang|e1$+"Lin|
|000024d0| 65 31 30 20 2d 2d 22 2b | 63 6f 6c 6f 75 72 63 68 |e10 --"+|colourch|
|000024e0| 61 6e 67 65 32 24 2b 22 | 20 20 20 20 20 2d 2d 4c |ange2$+"| --L|
|000024f0| 69 6e 65 31 30 22 0d 09 | 74 04 0d 09 7e 0c 20 20 |ine10"..|t...~. |
|00002500| 20 20 c9 20 31 31 0d 09 | 88 6e 20 20 20 20 63 6f | . 11..|.n co|
|00002510| 6c 6f 75 72 63 68 61 6e | 67 65 33 24 3d bd 28 31 |lourchan|ge3$=.(1|
|00002520| 39 29 2b bd 28 32 35 35 | 29 2b bd 28 32 35 35 29 |9)+.(255|)+.(255)|
|00002530| 2b bd 28 32 35 35 29 2b | bd 28 32 35 35 29 2b bd |+.(255)+|.(255)+.|
|00002540| 28 30 29 2b bd 28 30 29 | 2b bd 28 30 29 3a f4 2a |(0)+.(0)|+.(0):.*|
|00002550| 2a 20 57 68 69 74 65 20 | 62 61 63 6b 67 72 6f 75 |* White |backgrou|
|00002560| 6e 64 2c 72 65 64 20 66 | 6f 72 65 67 72 6f 75 6e |nd,red f|oregroun|
|00002570| 64 20 2a 2a 0d 09 92 6e | 20 20 20 20 63 6f 6c 6f |d **...n| colo|
|00002580| 75 72 63 68 61 6e 67 65 | 34 24 3d bd 28 31 39 29 |urchange|4$=.(19)|
|00002590| 2b bd 28 32 35 35 29 2b | bd 28 32 35 35 29 2b bd |+.(255)+|.(255)+.|
|000025a0| 28 32 35 35 29 2b bd 28 | 30 29 2b bd 28 30 29 2b |(255)+.(|0)+.(0)+|
|000025b0| bd 28 30 29 2b bd 28 30 | 29 3a f4 2a 2a 20 57 68 |.(0)+.(0|):.** Wh|
|000025c0| 69 74 65 20 62 61 63 6b | 67 72 6f 75 6e 64 2c 62 |ite back|ground,b|
|000025d0| 6c 61 63 6b 20 66 6f 72 | 65 67 72 6f 75 6e 64 20 |lack for|eground |
|000025e0| 2a 2a 0d 09 9c 04 0d 09 | a6 55 20 20 20 20 73 74 |**......|.U st|
|000025f0| 72 69 6e 67 24 3d 22 4c | 69 6e 65 31 31 20 2d 2d |ring$="L|ine11 --|
|00002600| 22 2b 63 6f 6c 6f 75 72 | 63 68 61 6e 67 65 33 24 |"+colour|change3$|
|00002610| 2b 22 4c 69 6e 65 31 31 | 20 2d 2d 22 2b 63 6f 6c |+"Line11| --"+col|
|00002620| 6f 75 72 63 68 61 6e 67 | 65 34 24 2b 22 20 20 20 |ourchang|e4$+" |
|00002630| 20 20 2d 2d 4c 69 6e 65 | 31 31 22 0d 09 b0 04 0d | --Line|11".....|
|00002640| 09 ba 0c 20 20 20 20 c9 | 20 31 32 0d 09 c4 38 20 |... .| 12...8 |
|00002650| 20 20 20 73 74 72 69 6e | 67 24 3d 22 4c 69 6e 65 | strin|g$="Line|
|00002660| 31 32 20 4b 65 72 6e 69 | 6e 67 20 43 68 65 63 6b |12 Kerni|ng Check|
|00002670| 20 2d 2d 41 56 2d 2d 4c | 57 2d 2d 20 4c 69 6e 65 | --AV--L|W-- Line|
|00002680| 31 32 22 0d 09 ce 04 0d | 09 d8 05 cb 0d 09 e2 04 |12".....|........|
|00002690| 0d 09 ec 0c 3d 73 74 72 | 69 6e 67 24 0d 09 f6 04 |....=str|ing$....|
|000026a0| 0d 0a 00 23 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...#.---|--------|
|000026b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000026c0| 2d 2d 2d 0d 0a 0a 04 0d | 0a 14 5e dd 20 f2 73 65 |---.....|..^. .se|
|000026d0| 74 63 6f 6f 72 64 28 70 | 6c 75 73 73 70 63 78 25 |tcoord(p|lusspcx%|
|000026e0| 2c 70 6c 75 73 73 70 63 | 79 25 2c 69 6e 74 65 72 |,plusspc|y%,inter|
|000026f0| 6c 65 74 78 25 2c 69 6e | 74 65 72 6c 65 74 79 25 |letx%,in|terlety%|
|00002700| 2c 72 75 62 5f 62 6c 78 | 25 2c 72 75 62 5f 62 6c |,rub_blx|%,rub_bl|
|00002710| 79 25 2c 72 75 62 5f 74 | 72 78 25 2c 72 75 62 5f |y%,rub_t|rx%,rub_|
|00002720| 74 72 79 25 29 0d 0a 1e | 49 f4 2a 2a 20 50 61 73 |try%)...|I.** Pas|
|00002730| 73 65 64 20 70 61 72 61 | 6d 65 74 65 72 73 20 69 |sed para|meters i|
|00002740| 6e 20 4f 53 20 55 6e 69 | 74 73 20 2d 2d 2d 20 50 |n OS Uni|ts --- P|
|00002750| 72 6f 63 20 63 6f 6e 76 | 65 72 74 73 20 74 6f 20 |roc conv|erts to |
|00002760| 6d 69 6c 6c 69 70 6f 69 | 6e 74 73 20 2a 2a 0d 0a |millipoi|nts **..|
|00002770| 28 04 0d 0a 32 3b 63 6f | 6f 72 64 25 21 30 3d 70 |(...2;co|ord%!0=p|
|00002780| 6c 75 73 73 70 63 78 25 | 2a 34 30 30 3a f4 2a 2a |lusspcx%|*400:.**|
|00002790| 20 45 78 74 72 61 20 78 | 20 67 61 70 20 77 69 74 | Extra x| gap wit|
|000027a0| 68 20 27 73 70 61 63 65 | 73 27 20 2a 2a 0d 0a 3c |h 'space|s' **..<|
|000027b0| 3b 63 6f 6f 72 64 25 21 | 34 3d 70 6c 75 73 73 70 |;coord%!|4=plussp|
|000027c0| 63 79 25 2a 34 30 30 3a | f4 2a 2a 20 45 78 74 72 |cy%*400:|.** Extr|
|000027d0| 61 20 79 20 67 61 70 20 | 77 69 74 68 20 27 73 70 |a y gap |with 'sp|
|000027e0| 61 63 65 73 27 20 2a 2a | 0d 0a 46 3e 63 6f 6f 72 |aces' **|..F>coor|
|000027f0| 64 25 21 38 3d 69 6e 74 | 65 72 6c 65 74 78 25 2a |d%!8=int|erletx%*|
|00002800| 34 30 30 3a f4 2a 2a 20 | 45 78 74 72 61 20 78 20 |400:.** |Extra x |
|00002810| 67 61 70 20 62 65 74 77 | 65 65 6e 20 6c 65 74 74 |gap betw|een lett|
|00002820| 65 72 73 20 2a 2a 0d 0a | 50 3f 63 6f 6f 72 64 25 |ers **..|P?coord%|
|00002830| 21 31 32 3d 69 6e 74 65 | 72 6c 65 74 79 25 2a 34 |!12=inte|rlety%*4|
|00002840| 30 30 3a f4 2a 2a 20 45 | 78 74 72 61 20 79 20 67 |00:.** E|xtra y g|
|00002850| 61 70 20 62 65 74 77 65 | 65 6e 20 6c 65 74 74 65 |ap betwe|en lette|
|00002860| 72 73 20 2a 2a 0d 0a 5a | 04 0d 0a 64 93 f4 2a 2a |rs **..Z|...d..**|
|00002870| 20 54 68 65 20 6e 65 78 | 74 20 66 6f 75 72 20 70 | The nex|t four p|
|00002880| 61 72 61 6d 65 74 65 72 | 73 20 61 72 65 20 75 73 |arameter|s are us|
|00002890| 65 64 20 66 6f 72 20 27 | 72 75 62 6f 75 74 20 62 |ed for '|rubout b|
|000028a0| 6f 78 27 2e 20 54 68 65 | 79 20 61 72 65 20 78 2c |ox'. The|y are x,|
|000028b0| 79 20 63 6f 6f 72 64 73 | 20 6f 66 20 42 6f 74 74 |y coords| of Bott|
|000028c0| 6f 6d 20 4c 65 66 74 28 | 27 62 6c 27 29 20 61 6e |om Left(|'bl') an|
|000028d0| 64 20 54 6f 70 20 52 69 | 67 68 74 28 27 74 72 27 |d Top Ri|ght('tr'|
|000028e0| 29 20 63 6f 72 6e 65 72 | 73 20 6f 66 20 72 65 71 |) corner|s of req|
|000028f0| 75 69 72 65 64 20 62 6f | 78 20 2a 2a 0d 0a 6e 1a |uired bo|x **..n.|
|00002900| 63 6f 6f 72 64 25 21 31 | 36 3d 72 75 62 5f 62 6c |coord%!1|6=rub_bl|
|00002910| 78 25 2a 34 30 30 0d 0a | 78 1a 63 6f 6f 72 64 25 |x%*400..|x.coord%|
|00002920| 21 32 30 3d 72 75 62 5f | 62 6c 79 25 2a 34 30 30 |!20=rub_|bly%*400|
|00002930| 0d 0a 82 1a 63 6f 6f 72 | 64 25 21 32 34 3d 72 75 |....coor|d%!24=ru|
|00002940| 62 5f 74 72 78 25 2a 34 | 30 30 0d 0a 8c 1a 63 6f |b_trx%*4|00....co|
|00002950| 6f 72 64 25 21 32 38 3d | 72 75 62 5f 74 72 79 25 |ord%!28=|rub_try%|
|00002960| 2a 34 30 30 0d 0a 96 04 | 0d 0a a0 05 e1 0d 0a aa |*400....|........|
|00002970| 04 0d 0a b4 23 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |....#.--|--------|
|00002980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002990| 2d 2d 2d 2d 0d 0a be 04 | 0d 0a c8 3b dd 20 f2 73 |----....|...;. .s|
|000029a0| 65 74 74 72 61 6e 73 66 | 6f 72 6d 28 78 73 69 7a |ettransf|orm(xsiz|
|000029b0| 65 2c 79 73 69 7a 65 2c | 72 6f 74 61 74 69 6f 6e |e,ysize,|rotation|
|000029c0| 2c 78 6f 66 66 73 65 74 | 25 2c 79 6f 66 66 73 65 |,xoffset|%,yoffse|
|000029d0| 74 25 29 0d 0a d2 9a f4 | 2a 2a 20 46 69 72 73 74 |t%).....|** First|
|000029e0| 20 74 68 72 65 65 20 70 | 61 72 61 6d 73 20 6e 65 | three p|arams ne|
|000029f0| 65 64 20 74 6f 20 62 65 | 20 72 65 61 6c 20 6e 75 |ed to be| real nu|
|00002a00| 6d 62 65 72 73 20 69 66 | 20 72 65 61 6c 69 73 74 |mbers if| realist|
|00002a10| 69 63 20 72 6f 74 61 74 | 69 6f 6e 20 69 73 20 74 |ic rotat|ion is t|
|00002a20| 6f 20 62 65 20 75 73 65 | 64 2e 20 4f 66 66 73 65 |o be use|d. Offse|
|00002a30| 74 20 70 61 72 61 6d 65 | 74 65 72 73 20 69 6e 20 |t parame|ters in |
|00002a40| 4f 53 20 55 6e 69 74 73 | 2c 20 63 6f 6e 76 65 72 |OS Units|, conver|
|00002a50| 74 65 64 20 74 6f 20 6d | 69 6c 6c 69 70 6f 69 6e |ted to m|illipoin|
|00002a60| 74 73 20 62 79 20 50 72 | 6f 63 20 2a 2a 0d 0a dc |ts by Pr|oc **...|
|00002a70| 04 0d 0a e6 17 ea 20 73 | 69 6e 74 68 65 74 61 2c |...... s|intheta,|
|00002a80| 63 6f 73 74 68 65 74 61 | 0d 0a f0 1e 73 69 6e 74 |costheta|....sint|
|00002a90| 68 65 74 61 3d b5 28 af | 2a 72 6f 74 61 74 69 6f |heta=.(.|*rotatio|
|00002aa0| 6e 2f 31 38 30 29 0d 0a | fa 1e 63 6f 73 74 68 65 |n/180)..|..costhe|
|00002ab0| 74 61 3d 9b 28 af 2a 72 | 6f 74 61 74 69 6f 6e 2f |ta=.(.*r|otation/|
|00002ac0| 31 38 30 29 0d 0b 04 04 | 0d 0b 0e 58 f4 2a 2a 20 |180)....|...X.** |
|00002ad0| 55 73 65 20 6f 66 20 72 | 65 61 6c 20 6e 75 6d 62 |Use of r|eal numb|
|00002ae0| 65 72 73 20 6d 65 61 6e | 73 20 27 2a 26 31 30 30 |ers mean|s '*&100|
|00002af0| 30 30 27 20 6e 65 65 64 | 73 20 74 6f 20 62 65 20 |00' need|s to be |
|00002b00| 75 73 65 64 20 62 65 6c | 6f 77 20 72 61 74 68 65 |used bel|ow rathe|
|00002b10| 72 20 74 68 61 6e 20 27 | 3c 3c 31 36 27 20 2a 2a |r than '|<<16' **|
|00002b20| 0d 0b 18 26 74 72 61 6e | 73 66 6f 72 6d 25 21 30 |...&tran|sform%!0|
|00002b30| 3d 78 73 69 7a 65 2a 63 | 6f 73 74 68 65 74 61 2a |=xsize*c|ostheta*|
|00002b40| 26 31 30 30 30 30 0d 0b | 22 26 74 72 61 6e 73 66 |&10000..|"&transf|
|00002b50| 6f 72 6d 25 21 34 3d 78 | 73 69 7a 65 2a 73 69 6e |orm%!4=x|size*sin|
|00002b60| 74 68 65 74 61 2a 26 31 | 30 30 30 30 0d 0b 2c 27 |theta*&1|0000..,'|
|00002b70| 74 72 61 6e 73 66 6f 72 | 6d 25 21 38 3d 2d 79 73 |transfor|m%!8=-ys|
|00002b80| 69 7a 65 2a 73 69 6e 74 | 68 65 74 61 2a 26 31 30 |ize*sint|heta*&10|
|00002b90| 30 30 30 0d 0b 36 27 74 | 72 61 6e 73 66 6f 72 6d |000..6't|ransform|
|00002ba0| 25 21 31 32 3d 79 73 69 | 7a 65 2a 63 6f 73 74 68 |%!12=ysi|ze*costh|
|00002bb0| 65 74 61 2a 26 31 30 30 | 30 30 0d 0b 40 04 0d 0b |eta*&100|00..@...|
|00002bc0| 4a 47 74 72 61 6e 73 66 | 6f 72 6d 25 21 31 36 3d |JGtransf|orm%!16=|
|00002bd0| 78 6f 66 66 73 65 74 25 | 2a 34 30 30 3a f4 2a 2a |xoffset%|*400:.**|
|00002be0| 20 4f 66 66 73 65 74 73 | 20 66 72 6f 6d 20 27 46 | Offsets| from 'F|
|00002bf0| 6f 6e 74 5f 50 61 69 6e | 74 27 20 52 33 20 26 20 |ont_Pain|t' R3 & |
|00002c00| 52 34 20 2a 2a 0d 0b 54 | 1e 74 72 61 6e 73 66 6f |R4 **..T|.transfo|
|00002c10| 72 6d 25 21 32 30 3d 79 | 6f 66 66 73 65 74 25 2a |rm%!20=y|offset%*|
|00002c20| 34 30 30 0d 0b 5e 04 0d | 0b 68 05 e1 0d 0b 72 04 |400..^..|.h....r.|
|00002c30| 0d 0b 7c 2d f4 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..|-.***|********|
|00002c40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002c50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 0b 86 |********|*****...|
|00002c60| 2d f4 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |-.******|********|
|00002c70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002c80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0d 0b 90 04 0d 0b |********|**......|
|00002c90| 9a 2d dd 20 a4 63 72 65 | 61 74 65 5f 77 69 6e 64 |.-. .cre|ate_wind|
|00002ca0| 6f 77 28 78 25 2c 79 25 | 2c 77 25 2c 68 25 2c 65 |ow(x%,y%|,w%,h%,e|
|00002cb0| 78 74 78 25 2c 65 78 74 | 79 25 29 0d 0b a4 04 0d |xtx%,ext|y%).....|
|00002cc0| 0b ae 2a f4 2a 2a 20 53 | 74 61 6e 64 61 72 64 20 |..*.** S|tandard |
|00002cd0| 63 72 65 61 74 65 20 77 | 69 6e 64 6f 77 20 46 75 |create w|indow Fu|
|00002ce0| 6e 63 74 69 6f 6e 20 2a | 2a 0d 0b b8 04 0d 0b c2 |nction *|*.......|
|00002cf0| 1c f4 2a 2a 20 76 69 73 | 69 62 6c 65 20 77 6f 72 |..** vis|ible wor|
|00002d00| 6b 20 61 72 65 61 20 2a | 2a 0d 0b cc 0e 21 62 6c |k area *|*....!bl|
|00002d10| 6f 63 6b 25 3d 78 25 0d | 0b d6 0f 62 6c 6f 63 6b |ock%=x%.|...block|
|00002d20| 25 21 34 3d 79 25 0d 0b | e0 12 62 6c 6f 63 6b 25 |%!4=y%..|..block%|
|00002d30| 21 38 3d 78 25 2b 77 25 | 0d 0b ea 13 62 6c 6f 63 |!8=x%+w%|....bloc|
|00002d40| 6b 25 21 31 32 3d 79 25 | 2b 68 25 0d 0b f4 04 0d |k%!12=y%|+h%.....|
|00002d50| 0b fe 21 f4 2a 2a 20 69 | 6e 69 74 69 61 6c 20 73 |..!.** i|nitial s|
|00002d60| 63 72 6f 6c 6c 20 6f 66 | 66 73 65 74 73 20 2a 2a |croll of|fsets **|
|00002d70| 0d 0c 08 0f 62 6c 6f 63 | 6b 25 21 31 36 3d 30 0d |....bloc|k%!16=0.|
|00002d80| 0c 12 0f 62 6c 6f 63 6b | 25 21 32 30 3d 30 0d 0c |...block|%!20=0..|
|00002d90| 1c 04 0d 0c 26 2b f4 2a | 2a 20 27 68 61 6e 64 6c |....&+.*|* 'handl|
|00002da0| 65 20 62 65 68 69 6e 64 | 27 20 61 6e 64 20 77 69 |e behind|' and wi|
|00002db0| 6e 64 6f 77 20 66 6c 61 | 67 73 20 2a 2a 0d 0c 30 |ndow fla|gs **..0|
|00002dc0| 10 62 6c 6f 63 6b 25 21 | 32 34 3d 2d 31 0d 0c 3a |.block%!|24=-1..:|
|00002dd0| 35 62 6c 6f 63 6b 25 21 | 32 38 3d 26 46 46 30 30 |5block%!|28=&FF00|
|00002de0| 30 30 30 32 3a f4 2a 2a | 20 52 65 64 72 61 77 73 |0002:.**| Redraws|
|00002df0| 20 6e 65 65 64 20 74 61 | 73 6b 20 68 65 6c 70 20 | need ta|sk help |
|00002e00| 2a 2a 0d 0c 44 04 0d 0c | 4e 19 f4 2a 2a 20 77 69 |**..D...|N..** wi|
|00002e10| 6e 64 6f 77 20 63 6f 6c | 6f 75 72 73 20 2a 2a 0d |ndow col|ours **.|
|00002e20| 0c 58 0f 62 6c 6f 63 6b | 25 3f 33 32 3d 37 0d 0c |.X.block|%?32=7..|
|00002e30| 62 0f 62 6c 6f 63 6b 25 | 3f 33 33 3d 32 0d 0c 6c |b.block%|?33=2..l|
|00002e40| 0f 62 6c 6f 63 6b 25 3f | 33 34 3d 37 0d 0c 76 2f |.block%?|34=7..v/|
|00002e50| 62 6c 6f 63 6b 25 3f 33 | 35 3d 32 3a f4 2a 2a 20 |block%?3|5=2:.** |
|00002e60| 6e 6f 72 6d 61 6c 20 77 | 69 6e 64 6f 77 20 62 61 |normal w|indow ba|
|00002e70| 63 6b 67 72 6f 75 6e 64 | 20 2a 2a 0d 0c 80 0f 62 |ckground| **....b|
|00002e80| 6c 6f 63 6b 25 3f 33 36 | 3d 33 0d 0c 8a 0f 62 6c |lock%?36|=3....bl|
|00002e90| 6f 63 6b 25 3f 33 37 3d | 31 0d 0c 94 10 62 6c 6f |ock%?37=|1....blo|
|00002ea0| 63 6b 25 3f 33 38 3d 31 | 32 0d 0c 9e 04 0d 0c a8 |ck%?38=1|2.......|
|00002eb0| 1a f4 2a 2a 20 74 6f 74 | 61 6c 20 77 6f 72 6b 20 |..** tot|al work |
|00002ec0| 61 72 65 61 20 2a 2a 0d | 0c b2 0f 62 6c 6f 63 6b |area **.|...block|
|00002ed0| 25 21 34 30 3d 30 0d 0c | bc 17 62 6c 6f 63 6b 25 |%!40=0..|..block%|
|00002ee0| 21 34 34 3d 2d 68 25 2d | 65 78 74 79 25 0d 0c c6 |!44=-h%-|exty%...|
|00002ef0| 16 62 6c 6f 63 6b 25 21 | 34 38 3d 77 25 2b 65 78 |.block%!|48=w%+ex|
|00002f00| 74 78 25 0d 0c d0 0f 62 | 6c 6f 63 6b 25 21 35 32 |tx%....b|lock%!52|
|00002f10| 3d 30 0d 0c da 04 0d 0c | e4 19 f4 2a 2a 20 74 69 |=0......|...** ti|
|00002f20| 74 6c 65 20 62 61 72 20 | 66 6c 61 67 20 2a 2a 0d |tle bar |flag **.|
|00002f30| 0c ee 12 f4 62 6c 6f 63 | 6b 25 21 35 36 3d 26 31 |....bloc|k%!56=&1|
|00002f40| 39 0d 0c f8 31 62 6c 6f | 63 6b 25 21 35 36 3d 26 |9...1blo|ck%!56=&|
|00002f50| 31 31 39 3a f4 2a 2a 20 | 49 6e 64 69 72 65 63 74 |119:.** |Indirect|
|00002f60| 65 64 20 77 69 6e 64 6f | 77 20 74 69 74 6c 65 20 |ed windo|w title |
|00002f70| 2a 2a 0d 0d 02 04 0d 0d | 0c 1a f4 2a 2a 20 77 6f |**......|...** wo|
|00002f80| 72 6b 20 61 72 65 61 20 | 66 6c 61 67 73 20 2a 2a |rk area |flags **|
|00002f90| 0d 0d 16 13 62 6c 6f 63 | 6b 25 21 36 30 3d 33 3c |....bloc|k%!60=3<|
|00002fa0| 3c 31 32 0d 0d 20 04 0d | 0d 2a 2f f4 2a 2a 20 73 |<12.. ..|.*/.** s|
|00002fb0| 70 72 69 74 65 20 61 72 | 65 61 20 70 6f 69 6e 74 |prite ar|ea point|
|00002fc0| 65 72 20 61 6e 64 20 6d | 69 6e 69 6d 75 6d 20 73 |er and m|inimum s|
|00002fd0| 69 7a 65 20 2a 2a 0d 0d | 34 0f 62 6c 6f 63 6b 25 |ize **..|4.block%|
|00002fe0| 21 36 34 3d 30 0d 0d 3e | 0f 62 6c 6f 63 6b 25 21 |!64=0..>|.block%!|
|00002ff0| 36 38 3d 30 0d 0d 48 04 | 0d 0d 52 1c f4 2a 2a 20 |68=0..H.|..R..** |
|00003000| 77 69 6e 64 6f 77 20 74 | 69 74 6c 65 20 64 61 74 |window t|itle dat|
|00003010| 61 20 2a 2a 0d 0d 5c 34 | 62 6c 6f 63 6b 25 21 37 |a **..\4|block%!7|
|00003020| 32 3d 77 69 6e 74 69 74 | 6c 65 25 3a f4 2a 2a 20 |2=wintit|le%:.** |
|00003030| 43 72 65 61 74 65 64 20 | 69 6e 20 27 50 52 4f 43 |Created |in 'PROC|
|00003040| 69 6e 69 74 27 20 2a 2a | 0d 0d 66 2c 62 6c 6f 63 |init' **|..f,bloc|
|00003050| 6b 25 21 37 36 3d 2d 31 | 3a f4 2a 2a 20 4e 6f 20 |k%!76=-1|:.** No |
|00003060| 76 61 6c 69 64 61 74 69 | 6f 6e 20 73 74 72 69 6e |validati|on strin|
|00003070| 67 20 2a 2a 0d 0d 70 2b | 62 6c 6f 63 6b 25 21 38 |g **..p+|block%!8|
|00003080| 30 3d 33 32 3a f4 2a 2a | 20 73 69 7a 65 20 6f 66 |0=32:.**| size of|
|00003090| 20 27 77 69 6e 74 69 74 | 6c 65 25 27 20 2a 2a 0d | 'wintit|le%' **.|
|000030a0| 0d 7a 04 0d 0d 84 1a f4 | 2a 2a 20 6e 75 6d 62 65 |.z......|** numbe|
|000030b0| 72 20 6f 66 20 69 63 6f | 6e 73 20 2a 2a 0d 0d 8e |r of ico|ns **...|
|000030c0| 0f 62 6c 6f 63 6b 25 21 | 38 34 3d 30 0d 0d 98 04 |.block%!|84=0....|
|000030d0| 0d 0d a2 2c c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...,.. "|Wimp_Cre|
|000030e0| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |ateWindo|w",,bloc|
|000030f0| 6b 25 20 b8 20 68 61 6e | 64 6c 65 25 0d 0d ac 0c |k% . han|dle%....|
|00003100| 3d 68 61 6e 64 6c 65 25 | 0d 0d b6 04 0d 0d c0 2d |=handle%|.......-|
|00003110| f4 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|00003120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003130| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0d 0d ca 04 0d 0d d4 |********|*.......|
|00003140| 15 dd 20 f2 6d 65 73 73 | 61 67 65 72 65 63 65 69 |.. .mess|agerecei|
|00003150| 76 65 0d 0d de 47 f4 2a | 2a 20 27 62 6c 6f 63 6b |ve...G.*|* 'block|
|00003160| 25 21 31 36 27 20 6f 66 | 20 4d 65 73 73 61 67 65 |%!16' of| Message|
|00003170| 20 70 61 72 61 6d 20 62 | 6c 6f 63 6b 20 67 69 76 | param b|lock giv|
|00003180| 65 73 20 4d 65 73 73 61 | 67 65 20 41 63 74 69 6f |es Messa|ge Actio|
|00003190| 6e 20 43 6f 64 65 20 2a | 2a 0d 0d e8 04 0d 0d f2 |n Code *|*.......|
|000031a0| 12 c8 8e 20 62 6c 6f 63 | 6b 25 21 31 36 20 ca 0d |... bloc|k%!16 ..|
|000031b0| 0d fc 13 20 20 20 20 c9 | 20 30 3a 71 75 69 74 25 |... .| 0:quit%|
|000031c0| 3d b9 0d 0e 06 05 cb 0d | 0e 10 04 0d 0e 1a 05 e1 |=.......|........|
|000031d0| 0d 0e 24 04 0d 0e 2e 2d | f4 2a 2a 2a 2a 2a 2a 2a |..$....-|.*******|
|000031e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000031f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003200| 2a 0d 0e 38 04 0d 0e 42 | 12 dd 20 f2 65 72 72 6f |*..8...B|.. .erro|
|00003210| 72 28 65 72 72 24 29 0d | 0e 4c 0f 21 62 6c 6f 63 |r(err$).|.L.!bloc|
|00003220| 6b 25 3d 32 35 35 0d 0e | 56 17 24 28 62 6c 6f 63 |k%=255..|V.$(bloc|
|00003230| 6b 25 2b 34 29 3d 65 72 | 72 24 2b bd 30 0d 0e 60 |k%+4)=er|r$+.0..`|
|00003240| 27 c8 99 20 22 57 69 6d | 70 5f 52 65 70 6f 72 74 |'.. "Wim|p_Report|
|00003250| 45 72 72 6f 72 22 2c 62 | 6c 6f 63 6b 25 2c 31 2c |Error",b|lock%,1,|
|00003260| 61 70 70 24 0d 0e 6a 05 | e1 0d ff 46 69 6c 65 44 |app$..j.|...FileD|
|00003270| 61 74 61 82 21 53 70 72 | 69 74 65 73 00 00 00 e0 |ata.!Spr|ites....|
|00003280| 02 00 00 46 f9 ff ff be | f7 44 24 03 00 6f 16 01 |...F....|.D$..o..|
|00003290| 00 00 00 10 00 00 00 e4 | 02 00 00 d4 02 00 00 21 |........|.......!|
|000032a0| 72 66 5f 66 6f 6e 74 73 | 00 00 00 04 00 00 00 10 |rf_fonts|........|
|000032b0| 00 00 00 00 00 00 00 07 | 00 00 00 2c 00 00 00 80 |........|...,....|
|000032c0| 01 00 00 0c 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000032d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 bb |........|........|
|000032e0| bb 00 b0 bb bb 0b b0 bb | bb 0b 00 00 00 00 00 00 |........|........|
|000032f0| 00 00 b0 0b b0 0b b0 b0 | 0b 0b b0 b0 0b 0b 00 00 |........|........|
|00003300| 00 00 00 00 00 00 b0 0b | b0 0b 00 b0 0b 00 00 b0 |........|........|
|00003310| 0b 00 00 00 00 00 00 00 | 00 00 b0 0b b0 0b 00 b0 |........|........|
|00003320| 0b 00 00 b0 0b 00 00 00 | 00 00 00 00 00 00 b0 bb |........|........|
|00003330| bb 0b bb bb bb 00 b0 bb | 0b 00 00 00 00 00 00 00 |........|........|
|00003340| 00 00 bb 0b bb 0b 0b bb | bb 00 bb b0 bb 00 00 00 |........|........|
|00003350| 00 00 00 00 00 00 bb bb | bb 00 00 bb bb 00 0b bb |........|........|
|00003360| bb 00 00 00 00 00 00 00 | 00 00 bb 00 bb 00 00 bb |........|........|
|00003370| 00 00 00 b0 0b 00 00 00 | 00 00 00 00 00 00 bb 00 |........|........|
|00003380| bb 00 00 bb bb 00 00 bb | 00 00 00 00 00 00 00 00 |........|........|
|00003390| 00 00 bb 00 bb 00 b0 bb | bb 0b b0 0b b0 00 00 00 |........|........|
|000033a0| 00 00 00 00 00 00 b0 bb | 0b 00 b0 bb bb 0b bb bb |........|........|
|000033b0| bb 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 b0 |........|........|
|000033c0| bb 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000033d0| 00 00 00 b0 0b 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000033e0| 00 00 00 00 00 00 00 bb | 0b 0b 00 00 00 00 00 00 |........|........|
|000033f0| 00 00 00 00 00 00 00 00 | 00 00 b0 bb bb 0b 00 00 |........|........|
|00003400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003420| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff ff 00 |........|........|
|00003430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003440| ff ff ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003450| 00 00 00 00 ff ff ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003460| 00 00 00 00 00 00 00 00 | ff ff ff 00 00 00 00 00 |........|........|
|00003470| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff ff 00 |........|........|
|00003480| 00 00 f0 ff 0f 00 ff ff | ff 00 f0 ff 0f 00 00 00 |........|........|
|00003490| ff ff ff 00 00 00 ff 00 | ff 00 0f ff f0 00 ff 00 |........|........|
|000034a0| ff 00 00 00 ff ff ff 00 | 00 00 ff 00 ff 00 00 ff |........|........|
|000034b0| 00 00 0f 00 ff 00 00 00 | ff ff ff 00 00 00 ff 00 |........|........|
|000034c0| ff 00 00 ff 00 00 00 f0 | 0f 00 00 00 ff ff ff 00 |........|........|
|000034d0| 00 00 ff 00 ff 00 00 ff | 00 00 00 ff 00 00 00 00 |........|........|
|000034e0| ff ff ff 00 00 00 ff 00 | ff 00 00 ff 00 00 f0 0f |........|........|
|000034f0| f0 00 00 00 ff ff ff 00 | 00 00 f0 ff 0f 00 f0 ff |........|........|
|00003500| 0f 00 ff ff ff 00 00 00 | ff ff ff 00 00 00 00 00 |........|........|
|00003510| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff ff 00 |........|........|
|00003520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003530| ff ff ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003540| 00 00 00 00 ff ff ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003550| 00 00 00 00 00 00 00 00 | ff ff ff 00 00 00 00 00 |........|........|
|00003560| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff ff |........|....... |
+--------+-------------------------+-------------------------+--------+--------+